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CPM earpg Sys/em 全 3 巻 の 構成 


この 「CP ン M Learning System」 全 3 巻 は , 次 の よう に 構成 され て いま す . 
入門 CP/M…… CP/M が どの 様 な も の で ある か を 解説 し CPM を 使う た め の 基礎 
知識 , 日 常 よ く 使う 各 コ マン ド の 実習 な ど を や さ し く 具体 的 に 解説 し 
まず 。 
今 ま で CPM に つい て は 全く 知ら な か っ た 読者 で も , 本 書 に より CP プ 
M の 概要 を 理解 し , 一 通り CPM が 使え る よう に な れる よう 配慮 き 
れ て いま す . 
実習 CP プ M……… CPM の 全 コ マン ドド と , その ほとん どす べ て の 使い 方 を 徹底 的 か つや 
さ し く , 具体 的 に 実習 し な が ら 解 説 し ます . また , CPM の ハー ドウ 
ェ ア お よび ソフ トウ ェ ア の 構成 に つい て も 解説 し , CPM の 実用 例 と 
し て , CPM アセ ンプ ラ に よる マシ ン 語 開発 の 全 過 程 を 実習 し ます . 
本 書 は , 読者 が 本 格 的 に CPM を 使う よう に な っ た 場合 , CPM の 
コマ ンド ・ ハ ンド ブック と し て , 随時 参照 する こと に な る で し ょ う . 
応用 CPM……… CPM を さら に 深く 広く 応用 する 場合 に つい て の 解説 書 で す . マ クロ ・ 
アセ ンプ ブラ に よる マシ ン 語 開発 。 シス テム ・ コ ー ル , 各種 高級 言語 の 
使用 例 , アプ リケーション や ユー ティ リティ の 実行 な ども , 分 か り 易 
い 実 行 例 に 基づい て 解説 し ます . さら に CPM の 内 部 構造 , BIOS の 
詳細 な ど , 本 格 的 な を CPM ユー ザー と し て , いずれ は 必要 と な る 知 
識 を 提供 し ます . 
各巻 は それ ぞ れ に まとまっ て いま す の で , 必要 に 応じ し て どの 巻 を 手 に され て も 利用 する こと が で き 
ます 。 
本 シリ ー ズ は , CPM version 2 . 2 を 基 に し て 書か れ て いま す が , I 旧 バ パー ジョ ン で ある , Version 
1. 4 を 使う 場合 の こと を 考慮 し , 共通 で な い コ マン ド に つい て は , その つど 注意 書き を 付け 加え て あ 
り ま す 。 
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姓 考 まそ が の き 


1982 年 7 月 。 NEC は , つい に 自社 の パー ソナ ル ・ コ ンピュータ , PC-8001 と PC-8801 に 対す る CP/ 
M を , NEC 自ら が 開発 し , 4 万 円 を 切る 低 価格 で 発売 し まし た . 価格 は 恐らく 国内 で は 今 ま で の 最 
低 の も の だ と 思わ れ ま す が , その 人 性 能 は , CPM 史上 の 1 つの 事件? と し て , 特記 に 価 する 素 晴 し 
いも の で す . 

ディ スク ・ ア クセ ス の 高速 化 ,CRT 表示 の 高速 化 , エス ケー プ ・ シ ー ケ ンス に よる スク リー ン ・ コ 
ント ロー ル , 割り 込み を 使っ た キー 入力 , N-BASIC の ROM 内 ルー チン の 呼び 出し 機能 等 々 , この 
CPM は , 今後 , 他 機 種 用 の CPM を 開発 する メー カー に と っ て , 高い 所 に 置か れ た 1 つの 目標 
と な る で し ょ う . パー ソナ ル ・ コ ンピュータ 用 の CPM で , この CPM を 超え る も の を 作る の は 
容易 な こと で は な いと 思わ れ ま す (この NEC の CPZM に つい て の 解説 は 巻末 付録 A を 参照 し て 下 
さい ). また だ , 東芝 も 同様 に PASOPIA 用 の CPM を , 本 書 の 原稿 が 書き 上 っ た 9 月 に 発売 し まし た . 


大 手 メ ー カ ー が , 自社 の 機種 用 の CPM を 自ら 開発 し , 発売 する に 至っ た 背景 に は , 現状 の BASIC 

コン ピュ ー タ の ソフ トウ ェ ア 的 な 行き び づまり が あり ます . 

この こと は , パー ソナ ル ・ コ ンピュータ が 発売 され て 以来 , 付属 の BASIC 言語 に よる その 応用 を 
考え て きた 多く の ユー ザー が 痛感 し て いる 問題 で あり , メー カー に と っ て も , 今後 の 市 場 を 確保 し , 
パー ソナ ル ・ コ ンピュータ 分 野 の 一 層 の 発展 を 望む に は , ソフ トウ ェ ア の 充実 が 急務 な の で す . その 
た め に は 8 ビッ ト ・ コ ンピュータ の 標準 OS と な っ て いる CPM を 載せ な けれ ば な ら な いと 判断 し 
索 癌 めで し ょ う 。 

今日 、「CP プ M」 は , デジ タル リサ ー チ 社 と いう 一 私 企業 の 製品 と いう より , 事実 上 の 世界 的 標準 OS 
と いう 意味 あい が 強く , 特に 8 ビッ ト 機 で 80 系 を 採用 し て いる も の な ら ば , CPM が 利用 で き な い パ 
ー ソ ナル ・ コ ンピュータ な ど は , メー カー の 熱意 の な さ を 示 す 最 た る も の と 言え る で し ょ う (学習 用 
機 , 専用 機 な ど は 除く ). 

「 ま ず CPM を 」 こ れ は 筆者 が , 日 本 で 最初 の CPM 解説 書 で ある “標準 CPM ハン ド プ ッ 
ク ” 以 来 主張 し て いま す が , これ は 全く ユー ザー の 側 に 立っ た 発言 で あり , CPM を 採用 する こと が 
最も 経済 的 で , 最も 多大 な 利益 を ち た ら す こと を 否定 で きる 人 は いな いで し ょ う . とにかく まず ,CP ン 
M に 集中 し て いる 豊富 な 共通 資源 を 利用 で きる 体制 を と る こと で す . すべ て は それ か ら の 話 で す . も 
し 他 の OS に 関心 が な あれ ば , UNIX like の OS な り , 何 な り を 試み る こと も よい で し ょ う . 

「 ま ず CPM を 」 こ れ が ユー ザー の 利益 に と っ て 最も 安全 確実 な が 道 で ある と 思い ます . 


著者 まえ が き 


本 書 「 応 用 CPZM」 も , 完成 が 大 幅 に 遅れ , 当 シ リー ズ の 多く の 愛読 者 に し びれ を きら させ て し ま 
い 、 どう も 申し 訳 あ り ま せん で し た . それ ほど 怠け て いた 訳 で は な い の で す が , いざ 手 を 付け て みる 
と あま り に も 多く の 事柄 が あり 過ぎ , 時 間 が か か っ て し まい まし た . し か し 本 書 の 内 容 を 見 て いた だ 
けれ ば , 多少 は 許し て も ら え る か な ? …… と も 思い ます . 本 書 「 応 用 CPZM」 に より , 初め て 世の中 
に , CPM の 本 当 の カカ を 紹介 で きる 本 が 出現 し た と 思っ て いま す . 


本 書 の 「 シ ステ ム ・ コ ー ル 」 の 章 に より , 多く の 読者 が , CPM 最大 の メリ ッ ト で ある この シス テ 
ム ・ コ ー ル を 自在 に 使い こなせ る よう に な る で し ょ う . それ に より , CPM 上 の 多く の アプ リ ケ ー シ 
ョ ン ・ ソ フト が 生ま れ て きま す . 

また 「 高 級 言 語 」 の 章 に 刺激 を 受け , 自分 の 目的 に 合う 言語 に 取り 組む 読者 も 大 勢い る で し ょ う . そ 
こ か ら は , アセ ンプ ラ で 書く の が 困難 な 大 き な シ ステ ム ・ ソ フト ウェ ア も 生ま れ て きま す . 

こう し て , 共通 OS の も と で , 優れ た ソフ トウ ェ ア が 生み 出さ れ , それ が 広く 流通 し , 日 本 の マイ 
クロ コン ピュ ー タ の ソフ トウ ェ ア 水 準 の 向上 に , 当 CP プ M シリ ー ズ が 少し で も 役立つ な ら , 著者 と 
し て これ 以上 の 喜び は あり ませ ん . そう な る こと を 心から 期待 し て いま す . 


1982 年 9 月 村瀬 康治 
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CP/M の 内 部 構造 と 機能 の 詳細 


本 章 で は ,CP/M の 内 部 構造 を ,CPM 上 で 実行 する 各種 ソフ トウ ェ ア を 開発 する ユー ザー や , CP/ 
M の BIOS を 変更 し て , 独自 の CPM に 改造 し よう と する ユー ザー を 対象 に , 具体 的 か つ 詳 細 に , 実践 
に 役立つ よう に 解説 し ます . 本 章 は , 次 章 の 「 全 シス テム ・ コ ー ル 徹底 解説 」 と は 密接 な 関係 に あり 
ます の で , それ ぞ れ 関係 する 項目 を 相互 に 参照 し て 読み 進ん で 下さ い . 


CP/M の 構成 は , 入門 お よび 実習 CPM で も 解説 きれ て いる よう に , 


TPA (Transient Program Area) 
GGB (Console Command Processor) 
BDOS (Basic Disk Operating System) 
BIOS (Basic Input Output System) 


と , アド レス 0000H 一 00FFH の スク ラッ チ ・ パ ッ ド ・ エ リア か ら 成 り 立 っ て いま す . その メモ リ 上 の 配 
置 を 図示 し て お きま す .「 実 習 CP プ M」 の 1 章 ・2 章 も 随時 参照 し て 下さ い . 


ンー ニ ニニ ニー= 


ノ @ ウォー ム ・ ス ター ト の エン トリ ・ ポ イン ト . 
メイ ン ・ メ モリ ei0 バ イト . 
iawecyikooa @BDOS へ の エン トリ ・ ポ イン ト 
@ フ ァイル ・ コ ント ロー ル ・ プ ロッ ク ・ エ リア . 
@ イ ンプ ブ プット, アウ トブ プット の DMA バ ッ フ ァ な ど , CPM 
シス テム の スク ラッ チ ・ エ リア と し て 使わ れる . 


デー ジーー デ ユー ザー・ プ ログ ラム ・ エ リア . 
「 ファ イル 名 の エク ステ ンション が “COM" で ある ブロ グ 
学生: 9 の 了 アド レス 1I00H か ら こ の エリ ア に ロー ド さ れ 実 行 
され る . 


A>,。 B> な どの プロ ンプ ト の あと に , ユー ザー が キー イ 
ン し た コマ ンド を 解釈 実行 する プロ セッ サ . 

ニニ ニラニー ここ ニニ ー ビ ピル トイ ン ・ コ マン ド の 各 プ ログ ラム を 含ん で いる . 

ビル トイ ン ・ コ マン ド 以 外 の コマ ンド が 与え られ た 場合 は , 
ディ スク 上 の ファ イル 名 か ら 該 当 プ ログ ラム を 捜し 出し て , 
トラ ンジ ェ ン ト ・ コ マン ド と し て 実行 する . 


ロー ズ ,。 リネ ー ム , イレ ー ズ 。 リー ド , ライ ト な どの ディ 
スク の 基本 的 な 操作 を ダイ ナミ ッ ク ・ ア ロケ ーション て で 管 


ヽ 際 ドラ イブ の セレ クト , ファ イル の オー プン , ク 
理 す る CPM の 心臓 部 . 


ヽ それ ぞ れ の コン ピュ ー タ の ハー ドウ ェ ア に 合わ せ て , 独自 
! に 作ら な けれ ば な ら な い , CP/M の 中 で 唯一 の ハー ドウ ェ 
Ko | ア に 依存 する 部 分 . 
ーー ニー ニー ニー ニニ ーー デー デーーーー コン ソー ル へ の 入出 力 ル ー チ ン , ディ スク の リー ド ・ ラ イ 
N ト ・ ル ー チ ン ,。 プリ ンタ へ の 出力 ルー チン な どの , ハー ド 
1 ウェ ア と 直接 関係 する 各 IO ル ー チ ン な ど を 収め た 部 分 . 
\ 


1 48K CPM の 場合 . CPM で は 使用 し な い 空 き エ リア . 
ユー ザー 独自 の VRAM や ROM な ど を 置く こと も で きる . 


(* は 48K CPZM の 値 ) 


Figure-1.1.0 CP ン M シ ステ ム の 構成 


CPM の 内 部 構造 と 機能 の 詳細 


1 .1 BIOS( 基 本 入出 カシ ステ ム ) 


CPM は , どの 機種 の CPM で も 能力 は 同じ と いう 訳 で は あり ませ ん . も ちろ ん CPU の クロ ッ ク が 
異な れ ば , 処理 スピ ー ド が 違っ て くる の は 当然 で す が , 同一 機種 で あっ て も , BIOS の 作り 方 次 第 で , 
例え ば ディ スク の 読み 書き に 要する 時 間 な ど は , 4 5 倍 の 差 が 出 て し まう の で す . 

ディ スク の アク セス ・ ス ピー ド に 関し て 言え 々 ば, 8 イン チ 片 面 単 密度 の “標準 ディ スク ” で は , デ 
ィ ス ク の 読み 書き の 際 の スキ ュー・ フ ァ ク タ (セク タ の 飛び 越し 数 . 後述 ) な ど が 決め られ て お り , 
よほど へ た な 設計 を し な い 限 り 、 どれ も ほぼ 同じ スピ ー ド に な り ま す . し か し , 倍 密度 や , 4 倍 密度 
の フロ ッ ピ ー・ デ ィ ス ク ,。 それ に ハー ド ・ デ ィ ス ク に な る と , BIOS の 設計 の 良し 悪し で , 4 5 倍 , 
ある い は それ 以上 の 差 が 出 て し まい ます . 

良く で きた CPM と ,、 そ う で な い CP プ M の 差 は 、 ディスク の アク セス ・ ス ピー ド だ け で は あり ませ 
ん 。 ス クリ ー ン 表示 に 関し て は 、 エ スケ ー プ ・ シ ー ケ シス ネス に よる カー ツル の アド ドレ ッ シ ン グ 和 や 。 そ の 
他 の スク リー ン ・ コ ント ロー ル は 可能 か (6.3 章 参照 ), 外部 機器 と の イン ター フェ イス に 関し て は , 
プリ ンタ や , RS-232C と ポート な どの 1 プ O ポ ー ト が, CPM の フィ ジ カ ル ・ デ バイ ス と し て 自由 に 活用 
可能 か , キ ー ボ ー ド の 入力 に 関し て は , 割り 込み 処理 に よる タイ プ ・ ア ヘッ ド 機 能 ( 割 り 込 み 処 理 と キー 
入力 バッ ファ に より ,。 どん な に 高速 で タイ ピン グ し て も , また , CPM が どの よう な 仕事 を 行っ て い 
よう と , キ 一 入力 し た も の は , 1 文字 の 取り こぼし も な 〈 く CPM に 入力 され る 機能 ) は ある か , な ど , 
いろ いろ な 面 で , 「 単 に CPM が 走る あと いう だ け 」 の も の か ら ,「 ど ん な アプ リケーション に も 対応 で 
きる 良く で きた CPM」 ま で, 元 は 同じ “CPM” で あっ て も , 大 き な 能 力 の 差 が だ 生じ し て し まう の で す . 

CPM 上 の 多く の ソフ トウ ェ ア の 中 で も , 最近 の 進ん だ ソフ トウ ェ ア を 実行 する に は , 6 . 3 章 で も 
解説 する よう に , 上 記 の 各 機 能 (特に スク リー ン の コン トロ ー ル ) な ど が サポ ー ト され た “良く で き 
た ” CPZM で な けれ ば , 実行 不可 能 な ソフ ト も 多く ある の で す . 

この よう な , CPM の 能力 の 差 が 生じ る 場所 が , これ か ら 解 説 を 行う 


BIOS (Basic Input Output System) 


で あり , この 部 分 を いか に 作る か (一 般 的 な テー ザー に と っ て は , “作ら れ て いる か ” で ある が ) に よ 
り , CPM 全体 の 能力 が 決定 され る の で す . 

た だ し , これ ら の 能力 の 差 は , CPM 自身 の 関知 する こと で は あり ませ ん . あ くま で CPM 外 の 問題 
で す . 例え ば , エス ケー プ ・ シ ー ケ ンス に よる スク リー ン の コン トロ ー ル な ど は , パー ソナ ル ・ コ ン ピ ュ ー 
タ 自 身 の ス クリ ー ン 出力 ルー チン が 当然 持っ て いな けれ ば な ら な い 機 能 で ある の に , それ が な い . 仕 
方 が な い の で CPM の BIOS 部 で その 面倒 を みる , と いう こと で す . ここ の 所 を 誤解 し な いよ うに し て 
下さ い . 


と! 


BIOS( 基 本 入出 カシ ステ ム ) 


で は , この BIOS 部 の 構成, 機能. 作り 方 な を どの 基本 を 解説 し て 行き まし ょ う . 
1.1.1 BIOS の 構成 と 機能 


それ ぞ れ の コン ピュ ー タ の ハー ドウ ェ ア に 合わ せ て 作ら れ た BIOS を CBIOS* (Customized BIOS) 
と 呼び ます . こ こ で は , デ ジタル リサ ー チ ナチ 社 の マニ ュ ア ル の 中 に , サン プル と し て 提示 され て いる CBIOS 
の ソー ス ・ フ ァイル の 骨子 を 基 に , 解説 を 行い ます . 
次 に , CBIOS の 構成 を プロ ッ ク 図 で 示し ます . 
BDOS と イン ター フェ イス 


故 請 部 分 は , すべ て の 
BIOS に お いて CP ン M サ 
イズ に 従っ て 固定 され 
て いる 絶対 アド レス で 
ある . ユー ザー が 変更 
する こと は で き な い . 


セク タ 変 換 ベ クト ル 


ディ スク ・ パ ラメ ー タ ・ ブ ロッ ク 


コー ルド ・ プ ブート, ウォー ム ・ ブ ー ト 
サブ ルー チン 
BOOT: WBOOT: 


ロジ カル |!|/0 デ バイ ス ハン ドラ 
各 サ プ ブルー チン 

CONST : CONIN : CONOUT : LIST : 
PUNCH : READER : LISTST : 


ディ スク ・ ド ライ ブ 関 係 の 各 ! ン 0 
ドラ イ バ ・ サ ブル ー チ ン 

HOME : SELDSK : SETTRK : SETSEC : 
SETDMA : READ : WRITE : SECTRAN : 


この デー タ ・ エ リア は 。 
CPM の シス テム の メ 
! モリ イメ ー ジ の 中 に 置 
! か な く て も よい . つま 
り , BIOS 部 以後 の 高位 
アド レス の どこ に 置い 
トル , チェ ッ ク ・ ベ クト ル の バッ ファ て も よい . 


! 
! 
1! 
1 
1 
1 
いき - SU | 
1 
1 
1 


Figure-1.1.1 CBIOS の 骨子 


CPM の 内 部 構造 と 機能 の 詳細 


CPM の ディ スク を 含め た すべ て の 入出 力 は , BDOS に より , こ の BIOS を 通し て 行わ れ ま す .CP/ 
M が , 何ら か の 入出 力 を 行 お うと する 時 , BDOS は , BIOS の 先頭 に 集め られ て いる それ ぞ れ の サブ プル 
ー チ ン へ 導く た め の “JUMP ベク トル ′ の 1 つ を コー ル し , その ベク トル に 導 か れ て 目的 の 機能 が 実 
行き れ ま す . また , 入出 力 が ディ スク 関係 で あれ ば , BDOS は , JUMP ベク トル の 次 の ブロ ッ ク に 位置 
する “ディ スク ・ パ ラメ ー タ ・ ヘ ペ ヘッダ” を , JUMP ベク トル の 1 つ “SELDISK” を 介し て 参照 し , デ 
ィ ス ク 管 理 に 必要 な 各種 デー タ が 格納 され て いる アド レス を 求め 、 その ディ スク の デー タ を 得る こと 
に よっ て すべ て の ディ スク 操作 を 行い ます . 

合計 17 個 の JUMP ベク トル は , どの よう な CPM の BIOS で も , 同じ CPZM サ イズ で あれ ば , その 
位置 する アド レス は 変わ る こと な く , 常に 同じ で あり , 必ず BIOS の 先頭 に 置か れ て いま す . 同時 に , 
それ ら の ベク トル の 順序 も 決め られ て お り , ユー ザー が 変更 する こと は で きま せん . 

この "JUMP ベク トル "が , それ ぞ れ の CPM サイ ズ に より , 固定 され て いる か ら こ そ , CPM は , 
どの よう な ハー ドウ ェ ア を 持っ た マシ ン の BIOS で も , 迷う こと な く 〈 く (1 番目 は BOOT, 4 番目 は コン 


ソー ル 入 力 」。 …… な ど と 決ま っ て いる の で ), すべ て の 入出 力 を 行う こと が で きる の で す 。 
次 に , Figure-1.1.1 に 示し た “CBIOS の 骨子 ′ の プ ブロッ ク 図 に 対応 する , 実際 の アセ ンプ ブリ ・ ソ ー 
ス ・ プ ログ ラム の アウ トラ イン を 示し ます . リス ト 中 の "…… "で 区 切ら れ て いる の が , それ ぞ れ Figure 


-1.1.1 に 示し た ブロ ッ ク の 区 切り に 当り ます . 

ここ に 示す の は , デジ タル リサ ー チ ナチ 社 が 提供 し て いる CBIOS の 骨子 の ソー ス フ ァ イル , "CBIOS. ASM? 
を ,48K CPM 用 に アセ ンプ ル し た PRN リ スト の アウ トラ イン で す . リ スト 冒頭 の , ラベ ル *MSIZE* 
の 値 を それ ぞ れ の マシ ン の 設定 可能 な 最大 メモ リ 容 量 に 合わ せ て アセ ンプ ブル す る こと に より , 任意 
の サイ ズ の CPM の BIOS を 作る こと が で きる よう に な っ て いま す . 


>TYPE CBIOS48.PRN / NE 組 : 党 
CBIOS の 信子 <48K CPM の 場合 ) 


48 3CP/M VERSION MENORY SIZE IN KILOBYTES 


*BIAS” は , 使用 する コン ピュ ー マ の 使用 可能 メモ リノ 替 置 に 合わ せ て , 
| CP -M サ イズ を 設定 する 場合 の , アド レス ・ オ フ セ ッ ト 値 で ある . 
# | 20KCP /M の 場合 , CCP の 始ま り は アド レス 3400H で ある . 


8 (MSIZE-2O) *1024 
CCP さ 4OOH+BIAS 
BDOS 
BIOS 


oOQO4H 。 * 
OOOSH WINTEL 1/0 BYTE 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 


oo2C = 
すべ て の 48KOP ン M に 
固定 0 スス * 


ORG 
NSECTB EQU 


BIOS SORIGIN 
(*ーCCP) /128 


それ ぞ れ の サブ ルー チン へ の ジャ ンプ ・ ベ フト ル , 


DF THI8 


PROGRAN 
JMARH BTART SECTOR COUNT 


ジャ ンプ 先 の アド レス は , それ ぞ れ の CBIOS に より 異な る . 


JIMP BOOT #COLD START 

WMBOUTE』 JMP MBOOT #MARM BTART 
JP CONST 5CONSOLE STATU8B 
JMP CONIN 1 CONSOLE CHARACTER 1N 
JMP CONOUT #CONSULE CHARACTER OUT 
JP し LIST 1LrgT CHARACTER OUT 

DB に の 作り 記 に JI PUNCH #PUNCH CHARACTER DUT 
,・ 名 サブ ルー 9V READER #RERDER CHARACTER OUT 


SMOVE HEAD TO HOME POBITION 


8 イン チ 片 面 単 密 度 の 購 準 ディ ス フ を 使っ た 上, 4 ドラ イプ ・ シ ステ ん 用 の 
ディ スク ・ パ ラメ ー ツ ・ テ ー ブ プル 


DIRBF , DPBLK 
CHKOO。ALLOO デア 
DIBK PARAMETER HEADER FOR DIBK O1 | イ 
Dw TRANS, OOOOH ス 
Dw ooooH。 OoooH ン 
Dw DIRBF , DPBLK バ パ 
Dw CHKO1 。ALLO1 天 
昌 DISK PQRQAMETER HEADER FOR DISK O2 | メ 
Dw TRANS, OOooH 1 
Dw ooooH, OOooH タ 
Dw DIRBF 。 DPBLK へ 
Dw CHKO2。ALLO2 ツ 
5 DISK PARAMETER HEADER FOR DIBK OS | ダ 
DWw TRANS, OOOOH 
Dw ooooH。 OOOoH 
pe DIRBF 。 DPBLK 
1CBECDBD Dw CHKOS。 ALLOS 人 
これ 必 鏡 の アド レス は 各 の 
CBIOS に より 一 定 で は な い 0 SECTOR TRANSLATE VECTOR セ う 
1 BA7S O1O7OD1 さ TRANS DB 1。7。1 さ 。 1 BECTORB 1。2。 さ 。4 アジ) 
BAZ7 19O5OB1 1 DB 25。 5。11。17 SECTDRB 5。6。7。B タ 0 
BA7B 17O さ O9OF DB 2 さ 。 さ 。9。 15 SECTORB 9。1O。11。12 
BA7F 1502OBOE DB 21。2。8。14 SECTORB 1 さ 。14。15。16 [03 
BAB さ S 141AO6OC DB 20。 26。6。 12 # SECTDRB 17。18。19。2O ク に 
BAB7 1218040A DB 18。24,4。10 1SECTORB 21。22,2 さ 。24 | に 
BABB 1016 DB 16,22 #SECTORB 25,26 ル 尋 
DPBLK』 』DIBK PARAMETER BLOCK。 CDMMON TO ALL DIBKB プ 
BABD 1AOO pw 26 SECTORS PER TRACK 吉 
BABF O さ pB さ # BLOCK BHIFT FACTOR クタ 
BA9O OZ DB フ JBLOCK MABK 上 イ 
BA1 OO DB Oo #NULL MABK ラス 
BA92 F2OO DWw 242 3DISK BIZE-1 4 
BR4 FOO Dw 6 さ DIRECTDRY MX 
BA96 CO DB 192 JALLOC O タム 
Ba7 Oo DB o SLLOC 1 4 
Ba?8 1ooo DWw 16 #CHECK BIZE 品 
BaA O2OO Dw 2 #TRACK OFFBET | 
9 END DF FIXED TABLES 2 


- の OK 到 論 下 抵 本 9rfG こ MINIANM に ロロ いく jmm ワ スズ の ー ロ 下 ど コ ーH ボ SW さ (。 


CPM の 内 部 構造 と 機能 の 詳細 


コー ルド ・ ブ ー ト , ウォーム ・ ブ ー ト に 関す る 一 軍 の サブ ルー チン . 


( 注 パー” 記号 は コー ザー に よる ルー チン を 表す ) 
ま 
BA9C 3SIMPLEST CASE IS TOD JUST PERFORM PARANETER INITIALIZATIDN 
*ー1O バ イト , ロブ イン ・ デ ィ ス ク No. な どの イニ シャ ライ ズ . 
JMP GOCPN #INITIALTZE AND BO TO CP/N 
H 
BAA6 SIMPLEST CASE 1IB TO READ THE DISK UNTIL ALL SECTORS LOQDED 
ャ ーー コ ー ル ド ・ ブ ー ト ・ ロ ー マ と BIOS 部 を 除く , シス テム ・ ト ラッ フ 全 休 を 胸 み 出し て , 
日 メモ リ に ロー ド す る . 
ま END OF LOAD UPERATION。 SET PARAMETERS QND GO TO CP/M 
BOCPMs … ウ ォ ー ム ・ プ ブー ト の だ め の 0 H の ジャ ンプ ・ ベ ペ フ トル, シス テム ・ コ ー ル の だ め の 5 H の 
BDOS へ の ジャ ンプ ・ ベ フト ル の セッ ト , それ ね に DMA ア ドレ ス の セッ ト な ど . 
JHP CCP GBD TU CP/NM FOR FURTHER PROCESB1NG 


4 つの ロジ カル ・ ア バイ ス の 各 ハ ンド ラ の サブ ルー チン . 


それ ぞ れ の コン ピュ ユー タ の ハー ドウ エア に 合わ せ て 作成 する . 
ご の 例 で は ,IO バ イト に よる フィ ジ カ ル ・ デ バイ ス の サポ ー ト は 行 つ て いな い . 


BB11 3 CONSOLE STQATUS。 RETURN OFFH IF CHARACTER READY。 OOH IF NOT 
ーー ツ CON : ” の ステ ー タ ス ・ チ ェ ッ ク ・ ル ー チ ン . 
RET 
} 
BB24 } CDNSOLE CHARACTER INTO REGTSTER A 
ーーYCON : ” の 1 文字 入力 ルー チン . 
RET 
BB さ 7 ICONDUTs 9 CHARACTER TPUT FRDM REGISTER C 
ーー "CON :” の 1 文字 H レ ー チ ン 
RET 
9 
BB49 LIST CHARACTER FROM REGISTER C 
*LST :” の 1 文字 HH ルー チン . 
RET 
U 
BB4B AT STATUS (O 1F NOT READY。 1 IF READY) 
5 は ? の ステ ー タ ス ・ チ エッ フー ルー チン . 
RET 
け 
BB4D IPUNCHs| PUNCH CHARACTER Te REBISTER C 
PUNGHs] 』PuNCH CHARA KTFNR FRON REBTSTER で 
RET 
BB4F READER READ CHARACTER INTO REBISTER QA FROM READER DEVICE 
SN *RDR : “ の 1 文字 入 カ ルーチン . 
RET 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー. 


ディ スク フ ・ ド ライ ブ の 入出 力 関 和 ド ライ バ ・ ル ー チ ン 


BBS54 [HOME | 』MOVE TO THE TRACK OO _ POSITION DF CURRENT DRIVE 
8 TRANSLATE THIS CALL INTO A SETTRK CALL MITH PARAMETER OO 
ーー HOME へ の シー ク ・ ル ー チ ン . 
RET ON FIRBT READ/WRITE 
D 
BBSA ISELDSK } 5ELECT DISK GIVEN BY REGISTER C 
の ドラ イブ 選択 ルー チン . 
RET 災 愉 8 0: 
! KC 
BB7D SET TRACK BY REBISTER C S 
に トラック NG. セツ ト ・ 2 5 2 
RET 5 
1 2 
BB92 ISETSEC 3 SET SECTOR GIVEN BY REBISTER ビ 
*ーー セ クタ No. セ ツ ト ・ ル ー チ ン . 
RET 9 


BIOS( 基 本 入出 カシ ステ ム ) 


BBAZ SECTRANs 
TRANSLATE THE SECTOR Su BY BC USINB THE 
0 に A す を こ AE BIVEN BY 
ー セ クタ No. 変 損 ル ー チ テン . 
RET き sMITH VALUE IN HL 
! 
BBAD ISETDMAr SET DNA ADDRESS GIVEN BY REGISTERB B AND C 
ャ ーーDMA パ ッ フ ァ セツ ッ ト ・ ル ー チ ン . 
RET 
9 
BBC3 JPERFDRM READ DPERATION (USUALLY THIS IS SIMILAR TO MRITE 
5 SD ME MILL ALLOM SPACE TU SET UP READ COMMAND。 THEN UBSE 
1 COMMON CODE IN WRITE〉 
*…ー1 セ クタ リー ド ・ ル ー チ ン . 
RET 
ま 
BBD6 MRITE sPERFORM A ey TION 
es 1 セク マタ ライ ト ・ ル ー チ ン . 
RET 
本 0 が IHS SI 
ーー ャ ペー CBIOS の 後 の 身 当 な 所 に , 災 の デー ツタ ・ エ リア を 確 尿 する. 
ーー バン これ ら の デー タ ・ エ リア は , イニ シャ ライ ズ ざ る 必要 は な ご., 
よ つ て 一 定 で は な し 9 CPM シス テム の メモ リ ・ イ メー ジ の 中 に 合 め な こ て も よい 
ま 
BCEg TRACKi DS 2 #TMO BYTES FOR EXPANSION 
BCEB SECTOR』 DS 2 』TMO BYTES FDR EXPANSION | し 
BCED DMAADi DB 2 #DIRECT MEMORY QDDRESS 設け て , 
BCEF DISKNOi DS 1 1DISK NUMBER O-15 で 時 す 
3 BCRATCH RAM AREA FDR BDDS USE 
BCFO = BEBDAT EQU い ) BEBINNINB DF DATA AREA 
BCFO DIRBFs DS8 128 5SCRATCH DIRECTORY QAREA 
BD7O ALLOO』 DS さ 1 #aLLOCRTI ロ N VECTOR O 
BDBF RLLO1s DS さ 1 5LLUCATION VECTOR 1 ご の エリ は , ディ ス フ ・ パ 
BDAE ALLO2』 DS さ 1 JaLLOCATIDN VECTOR 2 ラメ ー マ ・ ヘ ッ ダ に よっ て 
BDCD ALLO さ 』 DS さ 1 まき aLLOCRTION VECTOR さ アド レス され て いる . 
BDEC CHKOO』 DS 16 # CHECK VECTOR O 
BDFC CHKO1』 DS 16 CHECK VECTOR 1 
BEOC CHKO2s DS 16 #CHECK VECTOR 2 
BE1C CHKO さ 』 DS 16 #CHECK VECTOR さ 
LU 
BE2C = ENDDAT EQU END OF DATA QREA 
O1SC = DaTSIZ EQU *-BEBDATs STZE DF DQTA QREA 
BE2C END 


Figure-1.1.2 48K CPM の CBIOS の ソー ス ・ リ スト の 骨子 . 


17 個 の JUMP ベク トル に よっ て 導 か れる それ ぞ れ の サブ ルー チン を , リス ト 中 で は 次 の よう な 形式 


で 示し て お きま す . 
ラベ ル 名 : : この サ プ ル ー チ ン の 機能 
ー( ユ ー ザ ー に よる ルー チン ) 
RET 


これ ら の サブ プルー チン は , CBIOS を 作ろ うと する ユー ザー が , それ ぞ れ の マシ ン に 合わ せ て 作ら な 


けれ ば な 


り ま せん . 


CPM の 内 部 構造 と 機能 の 詳細 


次 に 動作 の 一 例 と し て , BDOS が "CONIN*( コ ン ソ ー ル か ら の 1 文字 入力 ) を コー ル し た 場合 の BIOS 
内 の 処理 の 流れ を 図示 し て お きま す . 


BDO0S か ら コ ン ソ ー ル | 


入力 が 呼ば れる . CONIN の JUMP ベク トル に より , 


サブ ルー チン *CONIN : "へ ジャ ンプ する 。. 


コン ソー ル か ら 入 力 さ れ 和 
た アス キー・ コ ー ド を 。 問 語 
A レ ジス タ に セッ ト し て 『 
BDOS に 帰る . 


Figure-1.1.3 CBIOS 内 の 処理 の 流れ 
次 に , 各 サ ブルー チン の それ ぞ れ の 機能 の 内 容 を 解説 し ます . 


JUMP ベク トル に より 導 か れる 各 サ ブ プルー チン の 機能 

各 サ プルー チン の 入出 力 条件 を , JUMP ベク トル の 並び 順に 示し ます . ここ に 示さ れ て いる それ ぞ 
れ の 内 容 は , 各 ル レー チン で の 最低 限 必要 な 処理 で あり , 他 に 必要 が あれ ば , ユー ザー 独自 の も の を 拡 
張 し ます . 
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BIOS( 星 本 入出 カシ ステ ム ) 


BOOT: (ロー ルド ・ プ ブー ト ) 
コー ルド ・ ス ター ト ・ ロ ー ダ か ら 引 き 継 が れ , シス テム の 基本 的 を な イニ シャ ライ ズ を 行う ルー チ 
ン で ある . 次 の “WBOOT* と も 関連 する の で , 共通 の ルー チン "GOCPM′ を 設け (リス ト 参 
照 )、 ここ で は , IO バイ ト の セッ ト と ドラ イブ A : を 選択 する た め に , アド レス 03H (ログ イン ・ 
ディ クス No. の 格納 バイ ト ) を 0 に セッ ト し て 。 ラ ベル "GOCPM” ヘ へ ジ ャ ンプ すれ ば よい . その 
他 こ こ で 必要 な も の が あれ ば 付け 加え , あと の 処理 は "WBOOT* の ルー チン と 共通 の “GOCPM/ 
で 行え を ば よい . 


WBOOT : (ウォ ー ム ・ プ ブー ト ) 
キー ボー ド か ら の Ctrl-C の 入力 時 や , アド レス 0000H へ ジャ ンプ し た 時 な どの ウォ ー ム ・ ス ター ト 
(リブート ) の 際 に 呼ば れん る ルー チン で あり , 次 に 示す 各 イ ニシ ャ ライ ズ を 行う . 


oO ディスク の シス テム ・ ト ラッ ク か ら , BIOS を 除い た すべ て を 読み 出し , メモ リ 上 に 再 ロ ー ド 
する . 

O ア ドレ ス 00Hー02H に , ウォ ー ム ・ ス ター ト の ジャ ンプ ・ ベ クト ル を セッ ト す る , 

O ア ドレ ス 05H-07H に , シス テム ・ コ ー ル の た め の BDOS へ の ジャ ンプ ・ ベ クト ル を セッ ト す 
る . 

O ロ グイ ン ・ デ ィ ス ク No. (アド レス 03H の 値 ) を と レジ スタ に セッ ト し て , CCP の 先頭 に ジャ 
シ プ す る 、 


CONST : (コン ソー ル ・ ス テー タス ) 
現在 の CON : ” に 割り 当て られ て いる デバ イス の ステ ー タ ス を チェ ッ ク す る . READY で あれ 
ば FEFH, BUSY で あれ ば 00H を A レ ジス タ に セッ ト し て リタ ン す る 。 


CONIN : (コン ソー ル ・ イ ンプ ッ ト ) 
現在 の CON : ” に 割り 当て られ て いる デバ イス か ら 1 文 字 を 入力 し 、 そ の アス キー・ コ ー ド を 
A レ ジス タ に セッ ト し て リタ ン す る . デジ タル リサ ー チ 社 の マニ ュ ア ル に は , 最上 位 ビ ッ ト を 0 
に する よう 指示 が ある が , その 必要 は な い ( カ ナ や , グラ フィ ッ ク ・ キ ャ ラク タ に 対応 する に は ). 
この ルー チン は , 入力 が な い 場 合 は 内 部 で 入力 だ ある まで ルー プ さ せる こと . 


CONOUT : (コン ソー ル ・ ア ウト プッ ト ) 
現在 の "CON : ” に 割り 当て られ て いる デバ イス に , C レ ジス タ に セッ ト さ れ て いる アス キー・ 
コー ド を 出力 する . 


CPM の 内 部 構造 と 機能 の 詳細 


LIST : (リス ト ・ ア ウト プッ ト ) 
現在 の “LST : ” に 割り 当て られ て いる デバ イス に , C レ ジス タ に セッ ト さ れ て いる アス キー・ 
コー ド を 出力 する 。. 


PUNCH : (パン チ ・ ア ウト プッ ト ) 
現在 の “PUN : ” に 割り 当て られ て いる デバ イス に , C レ ジス タ に セッ ト さ れ て いる アス キー・ 
コー ド を 出力 する . 


READER : (リー ダ ・ イ ンプ ッ ト ) 
現在 の "RDR : * に 割り 当て られ て いる デバ イス か ら 1 文字 を 入力 し 。A レ ジス タ に セッ ト し て 
リタ ン す る . 入力 が な い 場 合 は , 入力 され る ま て 内 部 で ルー プ す る . これ も , “CONIN* の 場合 
と 同様 に 、 最 上 位 ビ ッ ト を 0 に する 必要 は な い . 


HOME : (ホー ム へ の シー ク ) 
ログ イン ・ デ ィ ス ク の ヘッ ド を ,。 ホー ム 位 置 (トラ ッ ク 00) に シー ク す る . 後述 の “SETTRK? 
ルー チン を 利用 し て も よい . 


SELDSK : ( セ ド セ グ クト * ャ デア ィ ス タ ・ ド タイ オダ ザ /) 
C レ ジス タ に セッ ト さ れ て いる ドラ イブ No、(A:= ニ 0, B: = ニ 1。…… ,P : 三 15) の ドラ イブ を 
選択 する た め の ル ー チ ン . 
に レジ メダ に セッ ド さ きれ て いる ドラ イプ Non. に 人 徒 っ て 。 そ の ドラ イア の ディ ネ ク グッ パ ラメ ー タ * ヘ 
ッ ダ の ベー ス ・ ア ドレ ス (リス ト では, それ ぞ れ , BA33H, BA43H, BA53H, BA63H に 当たる ) 
を H、 し レジ スタ に セッ ト し て リタ ン す る . も し , 存在 し な い ド ライ ブ が 選択 され た 場合 は , 是 , 
し レジ スタ に 0000H を セッ ト し て リタ ン す る . 実際 の 動作 は , リー ド プ ライ ト の 直前 に 行 を ば よい 
( 注 ). 


SETTRK : (セッ ト ・ ト ラッ ク ) 
B,C レ ジス タ ( フ ロッ ピー・ デ ィ ス ク で あれ ば , 256 ト ラッ ク 以 下 で ある の で , C レ ジス タ の み 見 
れ ば よい ) に セッ ト さ れ て いる 値 の トラ ッ ク No. に , ヘッド を シー ク す る . 実際 の 動作 は , リー ドブ 
ライ ト の 直前 に 行え ば よい ( 注 ). 


SETSEC : (セッ ト ・ セ クタ ) 
B、C レ ジス タ に セッ ト さ れ て いる 値 の セク タ No. を , ディ スク ・ コ ント ロー ラ に 送り 込む . 実際 
の 動作 は 、 リー ドラ イト の 直前 に 行え を ば よい ( 注 ). 


BIOSC 基 本 入出 カシ ステ ム ) 


SETDMA: (セッ ト DMA ア ドレ ス ) 
B, C レ ジス タ に セッ ト さ れ て いる アド レス (デフォー ルト は 0080H, その 他 の 値 は ユー ザー の 
シス テム ・ コ ー ル に よる 設定 で 任意 ) に , ディ スク の リー ドブ ライ ト を 行う 際 の 128 バ イト の 入出 
カバ ッ フ ァ を 設定 する . 
要する に , ここ で 設定 され た バッ ファ を 介し て , リー ド プ ライ ト 時 の デー タ の 入出 力 が 行わ れる . 


READ: (ディ スク ・ リ ー ド ) 
*SELDSK*, SETTRK*, SETSEC* で , あら か じ め 指 定 さ れ て いる 1 セクタ の デー タ を 読み 
出し , DMA バ ッ フ ァ に 格納 する . 
セク タ ・ リ ー ド が 正常 に 行わ れ た 場合 は 00, も し 回 復 で き な い エラ ー を 起こ し た 場合 は 01 の エラ 
ー・ コ ー ド を A レ ジス タ に セッ ト し て リタ ン す る . た だ し , エ ラー が 起こ っ た 場合 , 普通 は 10 回 程 
度 の リト ライ を 行う . 
エラ ー・ コ ー ド に より , BDOS は エラ ー・ メ ッ セ ー ジ を 出力 する . 


WRITE: (ディ スク ・ ラ イト ) 
DMA バ ッ フ ァ の 1 セク タ の デー タ を , ディ スク に 書き 込む . その 他 は 上 記 "READ” の 場合 と 全 
《 同じ . 


ETSES 和 TE 8 (⑳ ス トス ザー ダス ) 
現在 の "LST : "に 割り 当て られ て いる デバ イス の ステ ー タ ス を チェ ッ ク す る . READY な ら FFH., 
BUSY な ら 00H を A レ ジス タ に セッ ト し て リタ ン す る 。. 
バッ ク ・ グ ラウ ンド ・ プ リン ト ア ウト ・ プ ログ ラム の “DESPOOL” な ど で こ の ルー チン が 利用 さ 
れる . 通常 は 00H と な る よう に し て お く 〈 く こと. 


SECTRAN : (セクタ ・ ト ラン スレ ー タ ) 
ディ スク の リー ドブ プラ イト を 少し で も 高速 に 行う 目的 の 。 スキ ュー( セ クタ の 飛び 越し 読み 書き . 
後述 ) を 行う た め の , ロジ カル ・ セ クタ ラフ ィ ジ カル ・ セ クタ の 変換 ルー チン で ある 。. 
ロジ カル ・ セ クタ No. が B,C レ ジス タ に , セク タ 変 換 テ ー プ ブル の 先頭 アド レス が D, E セ レジ スタ に 
セッ ト さ れ , 当 ル ー チ ン が コー ル さ れる . 変換 され た フィ ジ カ ル ・ セ クタ No. は ,。 HH, し レジ スタ 
に セッ ト し て り タ シ す る 。 


注 ) これ ら の パラ メー タ を, Figure-1.1.2 の アド レス BCE9H-BCEFH の バッ ファ に セッ ト し て お 
き , リー ド プ ライト の 直前 に 一 括 し て 実行 すれ ば よい . 


CP ノ M の 内 部 構造 と 機能 の 詳細 


ここ で 示し た CBIOS の プロ ッ ク 図 や . ソー ス ・ リ スト , 各 ル ー チ ン の 機能 な ど は , 標準 的 な CPM 
を 動作 きせ る た め の 必 要 最 少 限 の BIOS で あり , IO バイ ト に よる ロジ カル ・ デ バイ ス に 対す る 各 フ ィ ジ 
カル ・ デ バイ ス の 選択 や それ ら の ドラ イ バ ・ ル ー チ ン な ど は 含ま れ て いま せん . 

IO バイ ト を 利用 する 場合 は , 4 つの ロジ カル ・ デ バイ ス の 各 ル ー チ ン (ステ ー タ ス ・ チ ェ ッ ク ・ ル 
ー チ ン も 含む ) の それ ぞ れ の 冒頭 に . アド レス 03H の IO バイ ト の 値 を みて , その 値 が 指示 する デバ イ 
ス を 選択 する た め の “デバ イス ・ セ レク ト ・ ル ー チ ン ” を 設け な く て は な り ま せん 。 その 上 で , それ 
ら の フィ ジ カ ル ・ デ バイ ス 自 身 の ル ー チ ン を 設け る 訳 で す . 

その 他 , “良く で きた 使え る CPM" に する た め に は , オプ ショ ン 的 な 各種 機能 を , それ ぞ れ の ルー 
チン に 盛り 込む 必要 も ある で し ょ う . 一 方 ,. フィジカル ・ デ バイ ス や , ロジ カル ・ デ バイ ス の 中 で , 
も し 使う 必要 が な い 周 辺 装置 が ある な ら ば , それ ら の サブ ルー チン は 書く 必要 は あり ませ ん . その 場 
合 は ,、 も し 誤っ て コー ル さ れ た 場合 の 暴走 を 防ぐ た め に , ヾ RET? 命令 を 書い て お き , 何 も せ ず に リタ 
ン す る よう に し て お く の が 良い で し ょ う . 


ユー ザー・ プ ログ ラム か ら 各 エン トリ ・ ポ イン ト の 直接 CALL 

前 述 の 17 の JUMP ベク トル は , BOOT” と い WBOOT” を 除き , それ ら に 続く ルー チン は , 最後 が 
*RET? 命令 で 終わ る サブ ルーチン の 形式 を と っ て いま す . よっ て , 2 章 で 解説 する “シス テム ・ コ 
ー ル ” を 利用 し な く て も , JUMP ベク トル に 導 か れる 17 の 機能 は ,。 この エン トリ ・ ポ イン ト に 対す る 
各 CP/M サ イズ に 固有 の 絶対 アド レス を , 直接 に CALL す る こと に より , それ ぞ れ 実行 する こと が で 
きま す . BOOT,"WBOOT” の ルー チン は , サブ ルー チン で は あり ませ ん が , スタ ッ ク ・ ポ イン タ 
も イニ シャ ライ ズ し ます の で , “CALL' 命令 で も “JMP" 命令 で も どちら で も 実行 可能 で す . 

この BIOS エ ント リ ・ ポ イン ト の 直接 CALL に よる メリ ッ ト は , 


① コン ソー ル な どの 周辺 装置 の 入出 力 に 関す る も の で は , シス テム ・ コ ー ル に 伴う BDOS 内 で の オ 
ー バ ・ ヘ ッ ド (目的 の 機能 が 実行 され る まで に 介在 する 各種 ルー チン ) が 省 か れる の で , その 
分 だ け 処 理 が 高速 に な る . 

② BDOS に 一 切 関 係 せ ず 各 処 理 が 行え る . 

③ シス テム ・ コ ー ル の 機能 に は な い , 任意 の セク タ の リー ドブ プラ イト が 可能 で ある . 


な ど が 挙げ られ ます . 
CALL の 具体 的 な 方 法 は ,。 CALL に 際 し パラ メー タ が 必要 な も の は , それ ぞ れ の レジ スタ に パス ・ マ 


ラメ ー タ を セッ ト し て , それ ぞ れ の JUMP ベク トル の 絶対 アド レス を CALL す れ ば よい 訳 で す . 
例え ば Figure-1.1.2 の 48K CPM では, 


BIOS( 基 本 入出 カシ ステ ム ) 


C レ ジス タ ぐ で 出力 キャ ラク タ 
CALL BA0CH 


を 実行 する こと に より , コン ソー ル に 任意 の 1 文字 を 出力 する こと が で きま す . 

し か し , CPM の サイ ズ は 20K 一 64K ま で 様々 で す の で , 実際 の アプ リケーション に は , どの CP ブ 
M サ イズ に 対し て も 実行 可能 と な る よう に , アド レス 0000H-0002H に ある “WBOOT” の エン トリ ・ 
ポイ ント に 示さ れ て いる アド レス を 基 に , その 他 16 の JUMP ベク トル 自身 の アド レス を 算出 する と い 
う テ クニ ッ ク が よく 使わ あれ て いま す 。 

次 に , BIOS JUMP ベク トル ・ エ ント リ ・ ポ イン ト の 一 覧 表 を 示し て お きま す . 


BOO0T =4A00(20K ), 7A00(32K )、 BA00(48K), FA00(64K ) 


BOOT コー ルド ・ フ ー ト Cー0 

WBoOoT ウォ ー ム ・ プ ブー ト Cー ド ライ ブ No. 
CONST コン ソー ル ・ ス テー タス ・ チ ェ ッ ク な Pa1 
CONIN コン ソー ル 入 力 A 一 入力 キャ ラク タ 
CONOUT コン ソー ル 出 力 

LIST リス ト 出 力 0Cー 出 力 キ ャ ラク タ 

PUNCH パン チ 出 力 

READER リー ダ 入 力 ー A 一 入力 キャ ラク タ 
HOME ヘッ ド の ホー ム ・ シ ー ク ー ー 


SELDSK ディ スク ・ ド ライ ブ の 選択 C 一 ドラ イブ No. HLDPH 


SETTRK | トラ ッ ク No. の セッ ト Cー ト ラッ ク No. 

SETSEC | セク タ No. の セッ ト Cー セ クタ No. 

SETDMA | DMA ア ドレ ス の セッ ト BC 一 DMA ア ドレ ス 

READ 指定 され た セク タ の リー ド 人 
WRITE の ライ ト と 
LISTST リス ト ・ ス テー タス の チェ ッ ク AーFFH ン 00 


ニ ッッ (レデ ィ ー ビ ジー) 
SECTRAN セク タ ・ ト ラン スレ ー タ BC ロジ カル ・ セ クタ No. こ > を 
DEz- ト ラン スレ ー ト HL フィ ジ カ ル 


・ テ ー ブ ル ・ ア ド 0 
レス 


BIOS JUMP ベク トル ・ エ ント リ ・ ポ イン ト 


1.1.2 ディ スク ・ パ ラメ ー タ ・ テ ー ブ プル 

CBIOS の プ ブロック 図 や 。 ソ ー ス ・ リ スト に 示さ れ て いる よう に , “JUMP ベク トル に 続く エリ ア は , 
* デ ィ ス ク ・ パ ラメ ー タ ・ テ ー プ ブル ” と 呼ば れる , ディ スク の 入出 力 を 行う 際 に 必要 な , 各 デ ィ ス ク ・ 
ドラ イプ に 関す る 情報 を 保管 する た め の エ リア が 置か れ て いま す . 


CPM の 内 部 構造 と 機能 の 詳細 


ディ スク ・ パ ラメ ー タ ・ テ ー ブ ル は , 次 に 示す 3 つの 部 分 か ら 構成 され て いま す (Figure-1.1.1 お 
よび Figure-1.1.2 も 参照 ). 


1. ディ スク ・ パ ラメ ー タ ・ ヘ ッ ダ 
2. セク タ ・ ト ラン スレ ー ト ・ テ ー プ ブル 
3. ディ スク ・ パ ラメ ー タ ・ プ ロッ ク 


ご れ ら の それ ぞ れ に つい て 説明 し で て 行き まし よう 。 2 生 の 「 シ ステ ム ・ コ ヨー ル 』 の ファ シク ショ シ 
27、31, 35 な ど と も 密接 な 関係 が あり ます の で , 相互 に 参照 し て 下さ い . 


ディ スク ・ パ ラメ ー タ ・ ヘ ペッ ダ 

DPH と 呼ば れ , CBIOS の リス ト に 示さ れ て いる よう に , 4 ドラ イプ ・ シ ステ ム で あれ ば 4 個 、 n ド 
ライ プ ・ シ ステ ム で あれ ば 1 個 と いう よう に , 各 ド ライ プ に それ ぞ れ 独立 し た DPH を 設け ます . 

DPH の 構成 を 、 Figure-1.1.2 の CBIOS の リス ト を 例 に 解説 し まし ょ う . 

リス ト で は , 1 個 の ドラ イブ の 各 パ ラメ ー タ を , 1 ライ ン に 4 バイ ト ず つ , 4 ライ ン に 分 け て 書い 
て あり ます が 。 ここ で は 横 一 列 に 並べ て 示し ます 。 


16 バ イト = 
ディ スク ・ パ ラメ ー タ ・ 


トラ ンス レー ト ・ テ ー ブ ル ディ レク トリ パッ ファ 。 プロ ッ ク チェ ッ ク ペ クト ル PL 


バ ーー e SS リッ 
AA 各 ド ライ ブ の ディ スク ・ パ バラ | 各 デ ィ ス ク の 使用 状況 を 管理 


メー タ ・ ブ ロッ ク の 先頭 アド | する た め に BDOS が 使用 する . 
レス を 示す . 同一 ドラ イブ の | スク ラッ チ ・ パ ッ ド の 先頭 アド 


各 ド ライ ブ の セク タ ・ ト ラン スレ ー 場合 は ,。 | つの パラ メー タ ・| レス . 各 ド ライ ブ が 独立 し て 
ト ・ テ ー ブ プル の 先頭 アド レス を 示す . プ ブロック を 共用 で きる . 持つ . 
スキ ュー を か け な い 場合 は , 0000 を 入 
れる . 同 一 ドラ イブ の 場合 は , | つの BDOS が, ディ レク トリ を 操作 する 各 デ ィ ス ケッ ト 固 有 の ディ レク ト 
テー ブル を 共用 で きる . た め に , ス クラ ッ チ ・ バ パッ ド と し て リ 情 報 を ソフ トウ ェ ア ・ チ ェ ッ ク 
使用 する 128 バ イト の エリ ア の 先 する た め の ス クラ ッ チ ・ バ ッ ド の 先 
頭 ア ドレ ス を 示す . 頭 ア ドレ ス を 示す . 各 ド ライ ブ が 
独立 し て 持つ . 


Figure-1.1.4 1 つの ドラ イプ の ディ スク ・ バ パラ メー タ ・ ヘ ッ ダ の 構成 


上 図 で , ( ) 内 は , Figure-1.1.2 の CBIOS の リス ト の DISK00” の 場合 の シン ボル 名 で す . この 場 
合 の 実 ア ドレ ス が , リス ト 左 側 に 示さ れ て いま す の で , 実際 の トラ ンス レー ト ・ テ ー ブ ル (TRANS : ) 
や 。 リ スト 最後 の `SCRATCH RAM AREA” と を 対比 し て 下さ い . 


1 


BIOS( 星 本 入出 カシ ステ ム ) 


図 中 の 小文字 の n は , デ ィ ス ク No. を 示し ます が , 同一 機種 の ドラ イプ を 使用 する の で あれ ば ,^XLT"* 
と “DPB” は 1 つの も の を 全部 の ドラ イプ で 共用 する こと が で きま す (CBIOS の リス ト で は , 共用 し 
て いる )。 だ だ し 。 "CSV"。 ALV” に つい て は 完全 に 独 普 し て いな けれ ば な り ま せん 。 

ディ スク ・ ド ライ ブ を n 個 使用 する シス テム で は ,。 Figure-1.1.4 の ディ スク ・ パ ラメ ー タ ・ ヘ ッ ダ 
を , 決 の 図 に 示す よう に , それ ぞ れ の ドラ イブ に 対応 し て n 個 設 け ま す . 


DPBASE : (DPH の テー ブル の 先頭 に は , この ラベ ル が 付い て いる ) 


ドラ イブ nー 1 
(n の 最大 は 16= ニ P: ) 


図 中 で ,( ) の つい て な い シ ン ボ ル の 呼び 方 は , 後述 の “DISKDEF'” マク ロ ・ ラ イブ ラリ で 用 いら れ て いる も の で あり , ( ) の 中 の 
呼び 方 は , Figure-|.1.2 の CBIOS の リス ト で の も の で ある . 

CBIOS の リス ト で は , 4 つの 同一 ドラ イブ を 使用 する た め , “TRANS” と “DPBLK” は , それ ぞ れ 1 つ 設 ける だ け で , すべ 
て の ドラ イブ て 共用 し て いる . 


Figure-1.1.5  n 個 の ディ スク ・ ド ライ ブ を 持っ た シス テム の ディ スク ・ バ パラ メー タ ・ ヘ ッ ダ 


注 ) この ディ スク ・ パ ラメ ー タ ・ ヘ ッ ダ は 。, 後述 の “DISKDEFY マク ロ ・ ラ イブ ラリ に より , 自動 
的 に 作成 で きま す . 


セク タ ・ ト ラン スレ ー ト ・ ベ クト ル 

同心 円 状 の 各 ト ラッ ク の セク タ を , 少し で も 速く 読み 書き する た め の 手 法 と し て , “スキ ュー” が あ 
り ま す . スキ ュー は , セク タ の 飛び 越し 読み 書き の こと で あり , 普通 に アク セス する 場合 は , 同一 ト 
ラッ ク 上 の セク タ を , ディ スク 1 回 転 に つき 1 セク タ し か リー ド プ ライ ト で き な い と ころ , セク タ 番 
号 に この スキ ュー を 持た せる こと に より , 数 セク タ の リー ドブ ラ イト を 可能 に する も の で す . 

この “スキュー” の 概念 を 次 の 図 で 示し ます . 
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スキ ュー・ フ ァ ク タ の な い デ ィ ス ク の スキ ュー・ フ ァ ク タ 6 の 標準 8 イン チ デ ィ ス ク の 
リー ド ・ オ ペレ ーション リー ポッ ュ ャ オペレーション 


フィ ジ カ ル ・ セ クタ 25 を リー ド 
セク タ | を リー ド (ロジ カル ・ セ クタ 5 ) 
セク タタ 2 を リー ド 、 NN 
セク タ | の デー タ の 


フィ ジ カ ル ・ セ クタ | を リー ド . 
(ロジ カル ・ セ クタ | ) 


ーーー フィ ジ カ ル ・ セ ク 


偽 

喘 

沙 

要 ゃ 
で すべ ふっ 


を ロ フィ ジ カ ル ・ セ クタ 13 を リー ド 
コ 6 ジ (ロジ カル ・ セ クタ 3 ) 
の デー タ を リー ド . タ 
Murce  ※ の セク タ を リー ド 加 能 な 時 上 9 
ここ ン ペペ 生 6 セク タ と ぴの スキ ュー に より , 
この 期間 は , リー ド さ れ た 1 セク タ 分 の | タ に ーー 
デー タ が, RAM 内 の 転送 な ど , コン ビュ N が 可能 と な 
ー タ の 内 部 処理 を 受け て いる . KM - スキ ュー の な い 場 合 の 5 倍 高 速 に , 


ディ スク の リー ド / ラ イト が で きる . 


Figure-1.1.6 スキ ュー の 概念 


上 図 は 、 スキ ュー の な い 場 合 と , ある 場合 の , ディ スク 上 の 1 つの トラ ッ ク を リー ド す る 際 の 模式 
図 で す . 

まず 。 スキ ュー の な い 場 合 。 セ クタ を 1 2 …… の よう に 順番 に 読み 出す こと を 考え て み ま し ょ 
う . 実際 の ディ スク の アク セス は , この よう な セク タ を 順番 に 連続 し て リー ド プ ライ ト す る 場合 ( シ 
ー ケ ン シ ャ ル ・ フ ァイル ) が 多い の で す . 現実 は . ディ スク が 回 転 す る の で す が , 図 で は 便宜 上 , へ 
ッ ド が ディ スク の 回 り を 回 転 し な が ら 読 み 出す よう に 説明 され て いま す . 

図 に 示さ れ て いる よう に , ディ スク が 回 転 し , リー ド プ ライ ト ・ ヘ ッ ド の 下 に セク タ 1 が 来 た だ 時 に , 
セク タ 1 の デー タ が 読み 出さ れ ま し た . その デー タ を , 所 定 の メモ リ に 格納 し 、 次 の セク タ で ある セ 
クタ 2 を 読み 出す 準備 が 整っ た 時 に は , すでに セク タ 2 は 、 ヘ ッ ド の 下 を 通り 過ぎ て し まっ て いま す . 
ディ スク が 1 回 転 す る の を 待た な けれ ば , セク タ 2 を 読み 出す こと は で きま せん . つま り , スキ ュー 
が な けれ ば , セク タ を 連続 し て 読む 場合 は , ディ スク 1 回 転 に つき 1 セク タ し か リー ド で き な い と い 
うだ と 急 示 し て いま す 、 

次 に , スキ ュー・ フ ァ ク タ 6 を 持つ , 8 イン チ 片 面 単 密度 の 標準 フロ ッ ピ ー・ デ ィ ス ク の 場合 を 考 
えて み ま し ょ う . セク タ 変 換 テ ー ブ ル の 実際 は , Figure-1.1.2 の CBIOS の リス ト に も 示さ れ て いま す が , 
CPM が , 標準 ディ スク の ロジ カル ・ セ クタ (論理 セク タ ) を 1, 2, 3。 …… と 順番 に 読む と いう こと は , 
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実際 に は , フィ ジ カ ル ・ セ クタ (物理 セク タ ) を ,1。 7 13。 19,。…"… と 読み 出す こと に な る の で す . 

さて , この 場合 の リー ド ・ オ ペレ ーション の 様子 が Figure-1.1.6 に 図示 され て いま す が , この よう 
に ディ スク 1 回 転 に 。 ロジ カル ・ セ クタ 1 2, 3, 4, 5 の 計 5 セク タ が 読み 出さ れ て いま す . 先程 の , 
スキ ュー が な い 場 合 の 5 倍 の 速 き さ で ディ スク を アク セス で きる 訳 で す . 図 で は "リード ” に 対し て 述 
べ て いま す が , “ライト? の 場合 も 全く 同様 に これ ら の こと が 言え ます . 

以上 で , スキュー” の 概念 は 理解 さん た と 思い ます . そし て 標準 ディ スク の よう に , スキ ュー・ フ 
ァ ク タ を 持っ た 場合 に 必要 と な る も の が , 本 題 で ある 「 セ クタ ・ ト ラン スレ ー ト ・ ベ クト ル 」 で ある 
訳 で す . 

8 イン チ 標 準 デ イス ク の セク タ 変 換 テ ー ブ ル は, Figure-1.1.2 の CBIOS の リス ト に , その 実際 の も 
の が 示さ れ て いま す が , ロジ カル ・ セ クタ と フィ ジ カ ル ・ セ クタ は 次 の よう に 対応 し て いま す . 


実際 の 物理 的 セク タ 番 号 (フィ ジ カ ル ・ セ クタ 番号 ) 


(標準 ディ スク は , | トラッ ク が 26 セ クタ で ある ) 


CP/M 上 の 論理 的 セク タ 番 号 (ロジ カル ・ セ クタ 番号 ) 
円 環 に つなが っ て いる 


Figure-1.1.7 8 イン チ 標 準 デ ィ ス ク の ロジ カル ・ セ クタ 只 フ ィ ジ カル ・ セ クタ の 対応 


ディ スク の リー ド ノ ラ イト を 行う 時 , その 管理 者 で ある BDOS は , ロジ カル ・ セ クタ 番号 を CBIOS 
に 与 ん え ,。 その フィ ジ カ ル ・ セ クタ 番号 を “SECTRAN′” サブ ルー チン で 計算 きせ ます . そこ で 得 ら れ 
た フィ ジ カ ル ・ セ クタ 番号 を , "SETSEC′ サブ ルー チン で 指定 し て , READ′ や “WRITE” を 実行 
させ る 訳 で す . 
注 ) この セク タ ・ ト ラン スレ ー ト ・ ベ クト ル は , スキ ュー・ フ ァ ク タ を 指定 する こと に より , 後述 
の “DISKDEF′ マク ロ ・ ラ イブ ラリ に より , 自動 的 に 作成 され ます . 
スキ ュー の な い デ ィ ス ク は すべ て アク セス が 遅い と いう 訳 で は あり ませ ん . ハー ドウ ェ ア で ス 
キュ ー を 持た せ て いる も の や , プロ ッ ク ・ リ ー ド プラ イト (ディ スク 1 回 転 に 1 トラ ッ ク の 全 
部 の デー タ を リー ドブ プラ イト する も の ) を 行っ て 高速 化 を 計る こと も で きま す . 


ディ スク ・ パ ラメ ー タ ・ ブ ロック 

ディ スク ・ パ ラメ ー タ ・ ブ ロッ ク (DPB) は , Figure-1.1.2 の CBIOS の リス ト では, ラベル"DPBLK? 
で 始ま る 一 連 の テー ブル で あり , ディ スク ・ パ ラメ ー タ ・ ヘ ッ ダ の “DPBn” (Figure-1.1.2 の リス ト 
で は DPBLK”) に よっ て , その ブロ ッ ク の 先頭 が アド レス され て いま す . 
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DPB は , BDOS が ディ スク 管理 を する の に 必要 な , 各 ド ライ プ の ハー ドウ ェ ア 的 な 情報 の すべ て を 
持っ て お り ,、 ミニ ディ スク か ら 8 イ ンチ ・ デ ィ ス ク 。 それ に ハー ド ・ デ ィ ス ク ま で , すべ て の ドラ イ 
プ は , この DPB に よっ て その 諸 元 が 定義 きれ , BDOS に 管理 され ます . 

Figure-1.1.2 の CBIOS の リス ト で は , 4 つの ドラ イプ が 同一 の 機種 で ある た め , 1 つの DPB を 共用 
し て いま す . し か し , CPM は ,、 1 つの シス テム で , 機種 の 異な る ディ スク ・ ド ライ ブ を 自由 に 組み 
合わ せ て 使用 する こと が で きま す . 

例え ば ,. ドラ イブ A : が ミニ の 両面 ドラ イプ , ドライブ B : が ミニ の 片面 ドラ イプ と な る シス テム ( こ 
の よう な シス テム は 、, 両 面 一 片面 の ファ イル 変換 が , PIP コ マン ド で 自由 に で きる ) とか, ドラ イブ A : 。 
B: が 8 イン チ の 両面 で (た だ し , 8 イン チ の 片面 単 密 デ ィ ス ケッ ト を セッ ト し た 場合 は , 自動 判別 し 
て 。 そ の ドラ イプ は 。 8 イシ ナ 語 面 と し で 動作 する よう に し て で おく と よい )。 ドラ イプ Bi:, FE: が ミニ 
の 両面 と いう よう に , それ ぞ れ の ドラ イブ に 専用 の DPB を 設け る こと に より ,、 こ の よう な 異な っ た ド 
ライ プ を 1 つの シス テム で 合用 する こと が で きま す , 

次 に 。 ディス ク ・ パ ラメ ー タ ・ プ ロッ ク の 各 フ ィ ー ル ド に つい て 。, Figure-1.1.2 の 標準 ディ スク の 
CBIOS を 例 に 説明 し まし ょ う . 


DPBLK : ( 還 は 1 バイト, 


自国 は 2 バイ ト の エリ ア を 示す . 記入 され て いる 数 値 は 8 イン チ 標 準 デ ギィ ス ク の も の ) 


の 
で 
ビー | 


lul 
に 3 
王 


Sectors Per Track. | トラ ッ ク あ た り の 全 ロ ジ カ ル ・ セ クタ 数 (|28 バ イト を | セク タ と する ). 


Block SHift factor.、 デー タ ア ロケ ーション ・ プ ロッ クシ フト の ファ クタ で , デー タ ・ ブ ロッ ク ・ ア ロケ ー 
ショ ン サ イズ に よっ て 決め られ る . 数 値 "3” の 意味 は , 1024 三 I28X 23 の “3 乗 " の こと . 

BLock Mask、。 プロ ッ ク ・ マ スク の こと で , デー タ ・ プ ロッ ク の アロ ケー ショ ン ・ サ イズ に よっ て 決め ら 
れる . 数 値 "7" の 意味 は , 0 一 7 の 8 セク ターI024 バ イト で 1 ブロ ッ ク を 示す . 

EXtent Mask、 データ ・ ブ ロッ ク の アロ ケー ショ ン ・ サ イズ と , ディ スク ・ ブ ロッ ク 数 に よっ て 決め られ る 
エク ステ ント ・ マ スク 。 

Disk Size Max. ディ スク の デー タ ・ ブ ロッ ク の 最大 数 一 | . 数 値 "242” の 意味 は , 

(128 バ イト X26 セ クタ ) (77 本 一 2 本 ) プ 1I024 バ イト | 一 | 三 242( 余 り は 切り す て ). 


DiRectory entries Max. ディ スク に 収容 可能 な ディ レク トリ ・ エ ント リ の 数 一 !. 
次 の ALO0 と ALI は この ディ レク トリ ・ ブ ロッ ク に よっ て 決め られ る . 


に 。 AEO0 | EU  _ いさ 
四条 1IIIIIE ーAL0=192=COH, ALI ニ 0 を セッ ト し た ビッ ト ・ バ ター ン . 
08 15 


00 

各 ビ ピッ ト は , ディ レク トリ ・ エ ント リ に 使用 する デー タ ・ ブ ロッ ク を 示す . この 例 で は , 2 つの ビッ ト が 
I な の で , 2 つの デー タ ・ ブ ロッ クー 2K バイ ト が ディ レク トリ ・ エ リア と し て 使用 され る こと を 示し て いる . 
ChecK vector Size. ディ レク トリ を チェ ッ ク す る ベク トル の サイ ズ . 

CKS=(DRM 十 | ) プ 4 。 た だ し , ハー ド ・ デ ィ ス ク の よう な メデ ィ ア を 交換 し な いも の は 0 と な る . 


と コ 
ビ 


と コ 
束 
【ー】 


【 マ 】 
と 
の 


〇 
ユ 
| 


track OFFset. シス テム ・ ト ラッ ク を スキ ッ プ する た め の オ フ セ ッ ト 値 . ある い は , 大 容量 の ハー ド ・ デ ィ 
スク を , 複数 の ドラ イブ に 分 割 する 場合 に も 利用 で きる . 数 値 "2" は , シス テム ・ ト ラッ ク が 2 本 で あ 
る こと を 示す . 


つ 0 
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この DPB の 各 パ ラメ ー タ 間 の 関係 を 次 に 示し ます . 


1 ドラ イブ に 収容 可能 な 


AL0, ALI の ) X32 
ノ 


区 ト ~|/ の 数 X64 
X128 
X256 


X512 


Figure-1.1.8-1 Figure-1.1.8-2 Figure-1.1.8-3 


注 ) これ ら の ディ スク ・ パ ラメ ー タ ・ ブ ロッ ク は , 後述 の DISKDEF′ マク ロ ・ ラ イブ ラリ に より , 
自動 的 に 作成 する こと が で きま す . 


1.1.3 DISKDEF マク ロ ・ ラ イブ ラリ の 使い 方 


前 項 1.1.2 で 述べ た 3 つの 部 分 か ら 成 る ディ スク ・ パ パラメータ ・ テ ー ブ ル と , CBIOS 最 後部 の スク ラ 
ッ ナ RAM エ リア は , 標準 CP/M の ディ スケ ッ ト に 含ま れ て いる ファ イル , “DISKDEF. LIB” (ディ ス 
クッ ディ ファ イシ ・ マ クロ ・ ラ イブ ラリ ) を 。 デ ジタル リサ ー チ ナチ 社 の マク ロ ・ ア セン シン プラ の "MACZ 
で アセ ンプ ル す る こと に より , 自動 的 に 作成 する こと が で きま す . 

MAC” に つい て は , 3.1 章 を 参照 し て 下さ い . 
DISKDEF マ クロ は , 一 般 的 に , CBIOS の 中 の 次 に 示す 位置 に 置か れ ま す . 


MACLIB DISKDEFLIB--*DISKDEF* マ クロ ・ ラ イブ ラリ の 使用 を 宣言 . 


DISKS n ーー… n 個 の ドラ イブ を 持つ シス テム を 作成 する . 
DISKDEF 0… ーー ドラ イブ A : を 定義 する ,“…? は その パラ メー タ . 
DISKDEF 1 ーー ドラ イブ B : を 定義 する . 

DISKDEF 2… ーー ドラ イブ C : を 定義 する . 

DISKDEF nmー|… ーー 最終 ドラ イブ を 定義 する . 


BOOT お よび 各種 |/0 ル ー チ ン 


(: ス クラ ッ チ RAM エ リア ) 
ENDEF--ー- スク ラッ チ RAM エ リア を ここ へ 置く . 


Figure-1.1.9 DISKDEF マ クロ の 位置 
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次 に , DISKDEF マ クロ ・ ラ イブ ラリ を 使っ て 。 8 イン ナチ 標準 ディ スク の 場合 と ,。 5 イン チ の ミニ 
面 デ ィ ス ク の 場合 に つい て , 実際 に パラ メー タ を 設定 し て アセ ンプ ル を 行い 。 デ ィ ス ク ・ パ ラメ ー タ ・ 
テー ブル な ど を 自動 的 に 作成 し て み ま し ょ う . 


8 イン チ 片 面 単 密度 の 標準 ディ スク の 場合 
この ディ スク の 物理 的 パラ メー タ は , 


128 バ イト 1 セクタ 
26 セ グ み アプ 1 トラ ッ グ 
77 ド ラッ ク /1 デ ィ ス グ 


で あり , 標準 ディ スク の シス テム ・ デ ィ ス ク は は , 


2 本 の シス テム ・ ト ラッ ク 
64 の ディ レク トリ ・ エ ント リ 数 


と な っ て いま す の で , これ ら か ら , DISKDEF の 各 パ ラメ ー タ を 決定 し ます . 

アセ ンプ ブル する た め の ソ ー ス ・ フ ァイル は , 本 来 な ら ば , CBIOS 全 体 で ある 訳 で す が , ここ で は , 
DISKDEF マ クロ ・ ラ イブ ラリ の み に 注 目 し て も ら う た め , DISKDEF マ クロ の み の ソ ー ス ・ フ ァイル 
を 作り まし た . その アド レス は , Figure-1.1.2 の CBIOS の リス ト と 一 致す る よう に , ORG で 指定 し て 
あり ます . 

その ソー ス ・ リ スト (ファ イル 名 8INCH1S . ASM) を 次 に 示し ます . 

この ソー ス ・ フ ァイル を 。 マク ロ ・ ア セン プラ の “MAC” で アセ ンプ ブル し , その 結果 .、 ディ スク ・ 
パラ メー タ ・ テ ー ブ ル な ど が , どの よう に 展開 され る か , 生成 され た PRN フ ァイル を 見 て みる こと に 
し まし ょ う (MAC に よる アセ ンプ ブル は , 3. 1 章 を 参照 ). 

その 前 に ,、 上 記 ソ ー ス ・ フ ァイル 中 の DISKDEF パ ラメ ー タ の 意味 を 次 に 示し て お きま す . 


dn … ロ ジ カ ル ・ デ ィ ス ク No. 通 常 は 。0 三 A:,。 1 三 BE … > 15 ニ P : で ある . 

fsc … 各 トラ ッ ク の 最初 の セク タタ No. 0 ある い は 1 で ある 。. 

lsc … 各 トラ ッ ク の 最後 の セク タ No. 

Sskf … セ クタ の 飛び 越し 読み 書き の スキ ュー・ フ ァ ク タ . スキ ュー を か け な い 場合 は ,、 これ を 省 
略す る . 

bls …1 デ ー タ ・ ブ ロッ ク の サイ ズ (バイ ト 数 ), Figure-1.1.12 参 照 . 

dks … シ ステ ム ・ ト ラッ ク を 除く ディ スク の 全容 量 を , bls 単 位 で 表し た も の . 

dir … デ ィ レ クト リ ・ エ ント リ の 数 . 


ジン 
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S … 書 き 込 み 前 に た ログ イン され て か ら デ ィ ス ケッ ト が 変換 され て いな いか を チェ ッ ク す る ディ 
レク トリ ・ エ ント リ の 数 . フロ ッ ピ ー・ デ ィ ス ク の よう に 。 メデ ィ ア が 変換 で きる も の は 
dir と 同じ 値 . ハー ド ・ デ ィ ス ク の よう に 変換 し な いも の は 0 を セッ ト す る (チェ ッ ク 不 要 )、 

ofs … シ ステ ム ・ ト ラッ ク を 確保 する た め の オ フ セ ッ ト 数 . 通常 は 、 使用 する シス テム ・ ト ラッ 
ク の 本 数 を セッ ト す る . ハー ド ・ デ ィ ス ク の 場合 は , ドラ イブ 単位 に 分 割 す る の に も 利用 
され る . 


人 』 
オオ ボ ボ ポ キキ ポポ ネネ 日 InCh in ロ 1e ら 1ded * キ ボネ ボボ 玉 ボ 


ーー DISKDEF マ フロ ・ ラ イブ ラリ の 使用 を 宣言. 
ORG OBASSH (Flgure -1.1.2 の リス ト と 同じ アド レス に する だ め . ) 


[DISkS _ 4l 上 an 


dn dir OfS 


DISKDEF O,1 と - 6 624 24 さ ,。 64 。64 


TSC SkKf dksS CKS 


IDISKDEF 1』IO| ご 、 テン スク 1.2.3 を 。 ディ スク 0 と 同じ パラ メー マタ に 
DTBRDEP で 5 に 
1S 4 

する 場合 に 使用 する . 共用 可能 な テー ブル は 共用 


有 さ ね る の で , メモ リ の 節約 に な る . 


SCRATCH_ RAN AREA FOR BDOS USE 


ORG OBCFOH (Flgure-1.1.2 の リス ト と 同じ アド レス に する だ め ). 
1 スク ラッチ RAM エ リア を ここ に 設け る . 
END 

> 


Figure-1.1.10 標準 ディ スク 用 の ディ スク ・ パ パラ メー タ ・ テ ー プ ブル を , "DISKDEF” マク ロ ・ ラ イプ ブラ 
リ で 実験 的 に 作成 する た め の ソ ー ス ・ フ ァイル . 


以上 9 個 の パラ メー タ を , Figure-1.1.10 に 示さ れ て いる よう に 標準 ディ スク の 場合 の 値 に セッ ト し 
て , DISKDEF の マク ロ ・ コ ー ル を 行い ます . 

MAC に よる アセ ンプ ブル 後 の PRN フ ァイル を 次 に 示し ます . 展開 され た 4 つの 部 分 を , Figure-1.1. 
2 の CBIOS の リス ト と 照合 し て みて 下さ い 、. 
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CP/M の 内 部 構造 と 機能 の 詳細 


A>TYPE_ BINCH1S. PRN / 


ネネ ネル ネネ ホネ キネ 日 INCH SINBLE GTIDED キネ ネネ 水 放 放 


NACLIB DISKDEF 

BA ささ ORB OBA さ さ H 
DISkKS 4 

BA ささ += DPBASE EQU $ 3 BASE ロ F DISK PARAMETER BLDCKS 
BA ささ +B2BAOOoO | DPEo』 Duw XLTo。 ooooH 3 TRANSLATE TABLE 
BA ミ 7+OOOOQQQQO Du OoooH, OOOQH 3 SCRATCH AREA 

| BASB+FOBC7SBA DM DIRBUF 。 DPBO sDIR BUFF。PARH BLOCkK | テ 
BA さ F+BFBD7OBD DM CSVO, ALVO 3 CHECK。 nALLUC VECTDRS イ 
BA4 さ + 日 2BAOOOO | DPE1i DuM XLT1。OOOOH 3s TRANSLATE TABLE ろ 
BA4 フ +OOOOQOOOO DuM OQQOQOH』。 OQOQH SCRATCH AREA ・ 
BA4B+FOBC7 さ BA Du DIRBUF 。 DPB1 3 DIR BUFF。PARM BLOCK 
BA4F+BEBD9FBD Dw CSV1 , ALV1 # CHECK。 ALLDC VECTORS | ヌ 
BA5S+B2BAOOOO | DPE2』 Du XLT2。OOOOH # TRANSLATE TABLE ] 
BA57+OOOQOQQO Dw oOQOoH, OQQQH #SCRATCH AREA タ 
BASB+FOBC7 さ BA Du DIRBUF , DPB2 DIR BUFF。PARM BLOCK | 人 A 
BA5F+EDBDCEBD Du CSV2。 ALV2 ICHECK。 ALLOC VECTORS | 
BA6 さ +B2BAOOOO | DPES: Du XLT さ 。 OOOOH 』TRANBLATE TABLE 
BA67+oOoQooooo Du ooooH。 QOQQH 3 SCRATCH AREA 
BA6B+FOBC7 さ BA DIRBUF , DPB さ 3 DIR BUFF。PARM BLOCK 
BA6F+1CBEFDBD CSV さ , ALV さ CHECK。 ALLDC VECTORS 

DISKDEF O。1,26。6,1024,24 さ 。 64。64。2 

BA7 さ += 3 DISK PARM BLOCK ッ 
BA73+1AOO 3 SEC PER TRACK ス 
BA75+O さ 』 BLDCK SHIFT 】 
BA76+O フ 7 3 BLOCK MASK 所 
BA77+OOQ 3EXTNT MASK ラ 
BA7B+F2oO 3 DISK 5S1ZE-1 メ 
BA7A+ さ FOO 3sDIRECTORY MAX 4 
BAQ7C+CO 3 ALLOCO 
BA7D+OO 3 ALLOC1 月 
BA7E+10OQ 3 CHECK 1ZE ッ 
BABO+O20Q 3 DFFSET ク 
BAB2+= j TRANSLATE TABLE 
BAB2+O1 
BAB さ +O フ 7 
BAB4+OD 
BAB5+1 さ 
BAB6+19 
BAB7 フ +05 
BABB+OB 
BB9+1 1 
BABA+17 
BABB+0O さ ち 
BABC+O9 る 
BABD+OF 
BABE+15 に 
BABF+02 フ 
BA9O+OB 回 
BA91+OE ル 
BA92+14 
BA9 さ + 1 
BA94+06 
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BIOS( 基 本 入出 カシ ステ ム ) 


BA95+OC 
BA96+12 
BQ97+18 
BA9B+O4 
BA99+0a 
BA9A+1O 
BA9B+16 
DISKDEF 1。O 
BA7 さ += DPB1 EQU DPBo EQUIVALENT PARAMETERS 
OO1F+= ALBS1 EQU ALSO 5 SQAME ALLDCATIUN VECTOR SIZE 
OO10+= CSS1 EQU CSSO 3 SAME CHECKSUM VECTDR 8S1ZE 
BAB2+= XLT1 EQU XLTO # SAME TRANSLATE TABLE 
DISKDEF 2。O 
BA7 さ += DPB2 EQU DPBO 3EQUIVALENT PARAMETERS 
OO1F+= ALS2 EQU ALSO 3 SAME ALLDCATIUN VECTOR 8S1ZE 
QO10+= CSS2 EQU CSSQ BAME CHECKSUM VECTOR SIZE 
BAB2+= XLT2 EQU XLTO 3 SANE TRANSLATE TABLE 
DISKDEF さ 。O 
BA7 さ += DPBS EQU DPBO EQUIVALENT PARAMETERS 
OO1F+= ALB さ EQU ALSO #SAME ALLDCATIODN VECTOR S1ZE 
OO10+= CSS さ EQU CSSO 3 SAME CHECKSUM VECTOR 1ZE 
BAB2+= XLT ミ EQU XLTO 3 SAME TRANSLATE TABLE 
 】 円 
日 円 
ま ロ 
PA eS 
きま SCRATCH RAM AREA FOR BDOS USE 
BCFQ QRG OBCFOH 
BCFO+= BEGDAT 
BCFO+ DIRBUF 3 DIRECTDRY ACCESS BUFFER ク 
BD70+ ALVO ラ 
BDBF+ CSVOs ツ 
BD9F+ ALV1 る 
BDBE+ CSV1s 内 
BDCE+ ALV2 ェ M 
BDED+ CSV2』 本 
BDFD+ ALV さ 』 ラ 
BE1C+ CSV さ 』 
BE2C+= ENDDAT EQU 生 
O1 さ ビ += DATSIZ EQU ま ーBEGDAT 
BE2C END 
A> 7 
Figure-1.1.11 DISKDEF マ クロ ・ ラ イプ ラリ に より , 自動 的 に 作成 され た 標準 ディス ク の ディ スク ・ パ 


ラメ ー タ ・ テ ー プ ブル . 


この よう に , Figur-1.1.2 の リス ト と は , ラベ ル の 名 称 や 配置 が 異な る も の の , ディ スク パラ メー 
タ ・ テ ー ブ ル の 内 容 は 全く 一 致し て いる こと が 分 か り ま す . 
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5 イン チ の 両面 ディ スク の 場合 

5 イン チ の 両面 ブ ディ スク に つい て , 先程 と 同様 に ディ スク ・ パ ラメ ー タ ・ テ ー ブ ル を 作成 し て み ま 
し ま 

ミニ の 両面 ディ スク ・ ド ライ ブ の 物理 的 な 諸 元 は , 次 の よう な も の と し ます . 


296 パ イト プ ユ セク グ み 
32 セ クタ 1 トラ ッ ク (サイ ド 0, サイ ド 1 の 両面 で ) 
40 ド ジッ クノ 1 ザイ ス 必 


この ディ スク に は , “スキュー” を か け な い こと に し ます . そし て , DISKDEE パ ラメ ー タ の デー タ ・ 
プロ ッ ク の サイ ズ "bls” は 2K バ イト に し て 2048, bls 単 位 で 表し た ディ スク の 金 容 量 *dks” は 152, 
ディ レク トリ ・ エ ント リ の 数 "dir” と "cks′” は 128 と し ます . 1 トラ ッ ク 当 り の ロジ カル ・ セ クタ 数 
*jsc′ は , 32X256/128= ニ 64 と な り ま す . オフ セッ ト 数 "ofs′ は 前 回 と 同じ 2 と し ます . 

で は , 前 回 の Figure-1.1.10 の ソー ス ・ リ スト と 同じ も の に , 上 記 の パラ メー タ を セッ ト し た も の を 
次 に 示し ます . ファ イル 名 は MINI2W . ASM* で す . 


A>TYPE MINI2w. ASN ) 
まま 本 玉 Mini DOub1e ided 本村 
ORG OBA さ SH 
スキ ュー を かけ な い の で スキ ッ プ 
[DISkS 4 し て いる こと に 注意 . 


/ 
[DTSKDEF _O, 1 , 64, , 204 日 。 152。 1 2 日 。 1 2B。 2] 


SCRQCH RAM ARER FUR BDDS USE 


ORG OBCFOH 
IENDEF 


Figure-1.1.12 ミニ の 両面 デア ィ スク 用 の ディ スク ・ パ ラメ ー タ ・ テ ー ブ ル を , “DISKDEF”" マク ロ ・ ラ 
イプ ラリ で 実験 的 に 作成 する た め の ソ ー ス ・ フ ァイル . 


ど 4=) 


BIOS( 基 本 入出 カシ ステ ム ) 


これ を MAC を 使っ て アセ ンプ ブル し , 生成 され た PRN フ ァイル を 次 に 示し ます . 展開 の 状態 を Figure 


-1.1.11 の も の と 比較 し て 下さ い . 


>TYFE MINI2M. PRN 』 
1 キオ ネネ ネネ ネネ ネネ MINI DUUBLE BIDED * ネ まま ポポ 


BA ささ 


BA ささ += 

BA ささ +OOOOOOOO 
BA さ フ 7+OOOOOOQOQ 
BASB+FOBC7 く BA 
BASF+B3BD7OBD 
BA4 さ +OOOOOOOO 
BA47+OOOOOOQOO 
BQ4B+FOB ビ 73BA 
BA4F+B6BDA さ BD 
BAS さ +OOOOOOOQO 
BAS フ 7+OOOOQOOOQO 
BQSB+FOB ビ フ く BA 
BASF+E9BDD6BD 
BA6 さ +OOOQOOOO 
BA67+OOQO00Q0O 
BA6B+FOBC7 さ BA 
BA6F+1CBEO9BE 


BRZ さ += 
BA7 さ +400Q 
BA7S+O4 
BA76+OF 
BA77+O1 
BA7 日 +970O 
BQ7A+7FQO 
BA7 ビ +CO 
BA7D+OO 
BA7E+2000 
BABO+O20O 


OO0O+= 
"BA7 さ += 


OO1 さ += 
OO20+= 


MACLIB 
ロ RG 


DISKDEF 

OBA さ さ H 

に 8 

ト ] s BASE 0UF DIGK PARAMETER BLDUCK5 
XLTO。 OOOOH 3 TRANSLATE TABLE 

QOQQOH, OQQOH 3 SCRATCH AREA 

DIRBUF , DPBO 3DIR BUFF,PARM BLOCK ァ 
CSVO, ALVO 』CHEEK。 ALLUC VECTORS | え 
XLT1,OOOOH 』TRANBLATE TABLE ス 
OOQOQOH。 QOOOH 3 SCRATCH AREA フク 
DIRBUF 。 DPB1 3DIR BUFF。PARM BLOCK | 所 
8V り 1 。 人 QL ソ 1 # CHECK。 ALLUC VECTORS 
XLT2。OOOOH 3TRANSLATE TABLE 

OOQQH, OQOOH s SCRATCH AREA 


DIRBUF 。 DPB2 
CSV2, ALV2 

XLT さ , OOOOH 
OO0OH。 QOOQH 
DIRBUF , DPB さ 
CSV さ , ALV さ 


3DIR BUFF,PARH BLOCK 
3 CHECK。 ALLDC VECTORS 
5 TRANSLATE TABLE 

3 SCRATCH AREA 

3DIR BUFF,PARM BLOCK 
CHECK 。 ALLOC VECTORS 


入 ミ クー ウー 


O。 1。64。 。 204 日 , 152。 1 2 日, 128B, 2 


3DISK PARM BLOCK 
3 SEC PER TRACK 

3 BLUCK SHIFT 
5BLOCK MASK 
EXTNT MASK 
DISK SIZE-1 
DIRECTDRY MAX 

3 ALLOEO 


ニ ・ い 2 さり 


』 ALLOC1 
3 CHECK 81ZE 


OFFSET 


いこ 口 ! の ー テ 出 


XLTo EQU oO SNO XLATE TABLE セク フ ダ 変換 ベ フ トル 
が ガ 作 られ て いな いこ 

DISKDEF 1。O と に 注 導 . 

DPB1 EQU DPBO 3EBUIVALENT PARANETERS 

ALS1 EQU ALSO SAME QLLOCATION VECTOR SIZE 

CSS1 EQU CS8o 3 SANE CHECKSUM VECTOR SIZE 

XLT1 EQU XLTo BAME TRANSLATE TABLE 
DISKDEF 2。O 

DPB2 EQU DFBO EQRUIVALENT PARAMETERB 

ALS2 EQU ALSo 3BAME ALLDCATIDN VECTOR SIZE 

CSS2 EQU CSSo BAME CHECKSUM VECTDR 81ZE 

XxLT2 。 EqU xLTO 3 SAME TRANSLATE TABLE 
DISBKDEF さ ,O 

DPBS EQU DPBo j EQUIVALENT PARAMETERS 

ALS さ EQU AaLSO 3 SAME ALLOCATION VECTOR SIZE 

CSS さ EQU CSSo SAME CHECKSUM VECTOR SIZE 

XLT さ EQU xLTo SAME TRANSLATE TABLE 


フフ 


CPM の 内 部 構造 と 機能 の 詳細 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 


BCFO 


BCFO+= 
BCFO+ 
BD70+ 
BDB さ + 
BDA さ + 
BDB6+ 
BDD6+ 
BDE9+ 
BEO9+ 
BE1C+ 
BE さじ += 
01 4 ビ += 


CH そっ NN 


BE さ ビ 


に 2 


Figure-1.1.13 DISKDEF マ クロ ・ ラ イプ ラリ に より , 自動 的 に 作成 され た , ミニ の 両面 ディス ク の ディ 
スク ・ パ ラメ ー タ ・ テ チー プル 。 


今回 は スキ ュー が な いた だ ため, セクタ 変 換 ベ クト ル が 作ら れ て いま せん . また , 先程 の 8 イン ナチ 標準 
ディ スク の も の と , アセ ンプ ブル 結果 の 各 数 値 が 異な る こと を , よく 比較 し て 下さ い . 


デー タ ・ プ ロッ ク に つい て 

ここ で , "データ ・ プ ロック” に つい て , 解説 し て お きま し ょ う . 次 に 示す 図 の は , 8 イン チ の 標 
準 デ ィ ス ケッ ト の 場合 を 表し , (B は , ミニ の 両面 ディ スク の 場合 の 一 例 を 表し て いま す . 

1 デー タ ・ プ ロッ ク と は , Figure-1.1.10 で は 。 DISKDEF パ ラメ ー タ の bls′” に 当たる も の で あり , 
本 図 人 で は 128 バ イト が 8 個 (8 セク タ ) 連続 し た 計 1024 バ イト =1K バ イト の プロ ッ ク に 当たり ます . 

"デー タ ・ プ ロッ ク ” は, CPM が 管理 する ディ スク 上 の ファ イル ・ デ ー タ の 最少 単位 で あり , こ 
れ よ り 小 さい 容量 の ファ イル は 作る こと が で きま せん . 例え ば ⑳ の 場合 は , 1 ペー ジ (256 バ イト ) の 
SAVE を 行っ て も , それ に よっ て 作ら れ た ファ イル は 1K バ イト 長 と な る 訳 で す . 

8 の 場合 は , 物理 的 な 1 セク タ で ある 256 バ イト が 8 個 連 続 し た 計 2048 バ イト = テ 2K バ イト の プ ブロック 
が , 1 デー タ ・ ブ ロック で あり , ファ イル の 最少 単位 は 2K バ イト と いう こと に な り ま す . 

(⑳ の 場合 、 シ ステ ム ・ ト ラッ ク を 除く 全 デ ィ ス ク 容 量 は , 243 デ ー タ ・ プ ロッ ク で 243K バ イト で あり , 
の 場合 は , 152 デ ー タ ・ プ ロック で 304K バ イト で ある こと な ども , 本 図 か ら 理解 され る と 思い ます . 
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BIOS( 基 本 入出 カシ ステ ム ) 


(A) (B) 


8 イン チ 片 面 単 密 度 デ ィ ス ク の 場合 の デー タ ・ ブ ロッ ク 5 イン チ 両 面 ミ ニ デ ィ ス ク の 場合 の デー タ ・ ブ ロッ ク 
(128 バ パイ トン 1 セ クタ , 26 セ クタ ン 1 トラック, 全 77 ト ラッ ク ) (256 バ イト ノ 1 セク タ , 32 セ クタ ン | トラック , 全 40 ト ラッ ク ) 
デ | ディ スク | 
% 外周 | ー 
ク || トラ ッ ク 0. 1 の 2 本 は , CP/M の LE 
針 || シス テム ・ ト ラッ ク と し て 使用 する . PD 
チ こ この 2 つの ブロ ッ ク 
デ レ こ の 2 つの ブロ ッ ク ィ L 計 4K バ イト は , 
| 計 2k バ イト は , ス | ディ レク トリ エリ ア 
な ディ レク トリ ・ エ リア し 4 
全 容 
容 この ブロ ッ ク か ら 量 
時 デー タ ・ レ コー ド ・ を 
示 
ネ エリ ア す 
ディ スク 全体 で , ディ スク 容量 ディ スク 全体 で , 前 WE 
計 243 ブ ロック 243X( 1 K バ イト ) 計 152 ブ ロッ ク ディ スク ッ 
( K バ イト 1 9286 =243 K バ イト 2 K バ イト | ブロッ ク の も の が 」 | 2X@K パ イト 
243 ブ ロッ ク あ る . (シス テム ・ ト ラッ (bp ) ー304K バ イト 
ク を 除く ) (シス テム ・ ト ラ 
ッ ク を 除く ) 
デ ディ スク 
4| 内 周 | 
ク 
1 K ブ ロッ ク 未 満 の 余 ! 
ブロ ッ ク 未 満 の 余り . 合理 せ ず 最終 ブロ ッ ク 
最終 プロ ッ ク 


(128 バ イト X26 セ クタ ) X(77 本 一 2 本 ) _ 9 256 バ イト X32 セ クタ )X(40 本 一 2 本 ) 和 
1024 バ イト (= 1 デー タ ・ ブ ロッ ク ) 5 ブロ ッ ク 2048 バ イト (= | の イル トル 
1 
(余り は 切り す て る ) 
Figure-1.1.14 デー タ ・ ブ ロッ ク 


デー タ ・ ブ ロッ ク は , CPM が 管理 する ディ スク 上 の ファ イル の 最少 単位 で あり , 各 フ ァイル の デ 
ィ ス ク 上 の アロ ケー ショ ン は , 各 フ ァイル を 構成 し て いる デー タ ・ プ ロッ ク す べ て に つい て ディス 
ク 上 の どこ に 散在 し て いる か を , 常に ディ レク トリ ・ エ リア に 記録 する こと に より 管理 され て いま す . 
ディ スク 上 の 物理 的 に 隣り 合う デー タ ・ プ ロッ ク が , 1 つの ファ イル の 連続 で ある と は 限ら ず , 別 
の ファ イル の 一 部 で あっ た りす る 訳 で す が , 1 つの デー タ ・ プ ロッ ク の 中 で は , シー ケン シャ ル ・ フ 
ァイル で あれ ば 連続 し て いま す . つま り 1 デー タ ・ プ ブロ ッ ク が 2K バ イト で あれ ば , 2K バ イト 分 の デー 
タ の 内 部 は ディ スク の ロジ カル ・ セ クタ 上 で 連続 し て いる 訳 で す . 

この “デー タ ・ プ ブロック” は ,。 CPM の ディ スク 入出 力 の すべ て の 基 に な る も の で あり , よく 理解 
し て お く 心 要 が あり ます . 
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1.1.4 セク タ ・ プ ロッ キン グ デ ブロ ッ キ ンク グ の 概念 


8 イン ナチ 片 面 単 密 度 の 標準 ディ スク は , 物理 的 な 1 セク タ が 128 バ イト で あり , CPM の BDOS が 扱 
う ロ ジ カ ル ・ セ クタ の 128 バ イト と 一 致し て お り , BDOS は , 直接 。 ディ スク 上 の フィ ジ カ ル ・ セ クタ 
を アク セス する こと が で きま す . と ころ が , ディ スク ・ ド ライ ブ の 種類 は , 3.5 イ ンチ の マイ クロ フロ 
ッ ピ ー・ デ ィ ス ク , 5 イン チ の ミニ フロ ッ ピ ー・ デ ィ ス ク か ら , 数 10 メ ガバ イト の 容量 を 持つ ハー ド ・ 
ディ スク な ど 様 々 で あり , 記録 密度 や 、 1 セク タ 当 た り の バイ ト 数 な ども 異な り ま す . すべ て の ディ 
スク ・ ド ライ プ は , デー タ の 読み 書き を , その ドラ イブ 固有 の 1 フィ ジ カ ル ・ セ クタ の 単位 で 行い ま 
す . 例え ば . ディ スク 上 の デー タ の 一 部 を 書き 替 える 場合 , 1 バイ ト の み の 変 更 で あっ て も , 1 フィ 
ジ カ ル ・ セ クタ を メモ リ 上 に 読み 出し ,。 デー タ の 変更 を 行い 、 一 ディ スク 上 の 元 の セク タ に メモ リ 
上 の 1 フィ ジ カ ル ・ セ クタ の デー タ を 書き 込み ます . つま り , CPM の BDOS は , フィ ジ カ ル ・ セ ク 
タ と ロジ カル ・ セ クタ が 1 対 1 に 対応 する , 1 セク タ が 128 バ イト の ディ スク で な いと , 直接 に ディ ス 
ク へ の アク セス は で き な い と 言う こと に な り ま す .。 

し か し , 現在 多く 使わ れ て いる ディ スク は , 1 セク タ が 256 バ イト とか, ハード ・ デ ィ ス ク で あれ ば 
数 K バ イト な どの も の で あり , 1 フィ ジ カ ル ・ セ クタ が 128 バ イト で , 現在 一 般 に 使わ れ て いる の は , 
標準 ディ スク ぐらい の も の で し ょ う . そこ で プ ブロッキング, デブ プロ ッ キ ング が か 必要 に な っ て 〈 く る の で す . 

プ ブロッキング, デブ プロ ッ キ ング は ,。 フィ ジ カ ル ・ セ クタ ーー ロジカル ・ セ クタ の 変換 アル ゴリ ズム で 
あり 、 ディス ク ・ ア クセ ス の パフ ォ ー マ ンス に 重要 な 影響 を 与え ます . 

まず 、 ブロッキング, デブ プロ ッ キ ング の 原理 を 図示 し た も の を 次 に 示し ます . この 例 は 、 ディ スク 
の フィ ジ カ ル ・ セ クタ が 512 バ イト で あり , OS の ロジ カル ・ セ クタ は , CPM を 想定 し て いる の で 当 
然 128 バ イト の 場合 に つい て 解説 し て いま す . 

プロ ッ キ ング は 、 ディス ク ヘ データ を 書き 込む 場合 (0S の 一 般 用 語 で は “PUT”) の 手法 で あり , 
デ プ ロ ッ キン グ は その 逆 の ,、 ディ スク か ら デ ー タ を 読み 出す 場合 ("GET?) の 手法 の こと を 言い ます . 
そし て これ ら の ルー チン は , BIOS 内 に 設け られ ます . 


まず , デ プ ロ ッ キン グ か ら 解 説 し まし ょ う . 


デブ プ ブロッキング 

Figure-1.1.15 の 「 デ プロ ッ キ ング の 原理 」 か ら , も うす で に 概念 は 把握 され て いる こと と 思い ます 
が ,。 この 図 を 基 に 説明 し まし ょ う . 

例え ば “TYPE” コマ ンド な ど で , ディ スク 上 の ファ イル を シー ケン シャ ル に 読み 出す 場合 を 考え 
て 下さ きい. 

BDOS は , 最初 の セク タ (最初 の ロジ カル ・ セ クタ の 128 バ イト ) を ディ スク か ら 読 み 出し た い の で 
す が , ディ スク か ら は 128 バ イト 単位 で は 読み 出す こと は で きま せん . そこ で BIOS は , ロジ カル ・ セ 
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クタ 1 が 含ま れる , ディ スク 上 の フィ ジ カ ル ・ セ クタ 1 を ,。 RAM 上 の ホス ト ・ バ ッ フ ァ に 読み 出し ま 
す : 

ホス ト ・ バ ッ フ ァ は , 1 フィ ジ カ ル ・ セ クタ の バイ ト 数 の 容量 を 持ち 。 これ は , 1 ロジ カル ・ セ ク 
タ の バイ ト 数 の 整数 倍 に 当たり ます . 図 の 例 で は , 1 フィジカル ・ セ クタ は 512 バ イト で す の で , ホス 
ト ・ バ ッ フ ァ は , 128X 4 =512 バ イト の 容量 を 持っ て いま す . 

フィ ジ カ ル ・ セ クタ 1 の 512 バ イト の デー タ は , 一 度 の ディ スク ・ ア クセ ス で 瞬時 に し て ホス ト ・ バ 
ッ フ ァ に 格納 され まし た . BDOS は , さっ そく ホス ト ・ バ ッ フ ァ 内 の ロジ カル ・ セ クタ 1 の 128 バ イト 
の デー タ を 処理 し , 商 の ロジ カル ・ セ クタ 2 の デー タ を 読み 込 も うと し ます . ここ で 重要 な の は , BDOS 
が ロジ カル ・ セ クタ 2 を 読み 込 も うと する 時 に , ディ スク 上 の フィ ジ カ ル ・ セ クタ 1 を 再度 アク セス 
し な いと いう こと で す . 求め る ロジ カル ・ セ クタ 2 は , RAM 上 の ホス ト ・ バ ッ フ ァ に 存在 し て お り , 
これ を 処理 する 方 が , 再度 ディ スク を アク セス する より ずっ と 速い か ら で す . 


デブ ロッ キン グ の 原理 プ ブロッ キン グ の 原理 
(ディ スク か ら デ ー タ の 読み 出し ) (ディ スク へ の デー タ の 書き 込み ) 
実際 の ディ スク の トラ ッ ク の 一 部 分 実際 の ディ スク の トラ ッ ク の 一 部 分 


ーー ーー ーーーーーーーーー ノ ーー 
一 度 で ホス ト ・ バ パッ ファ に メッ ファ る 体 を ディ スク に 格 級 
読み 出す . 
ジ カ ル ・ セ 1 ロジ カル ・ セ クタ 4 が 書き 込ま れ 
計 あ も ンプ メモ リ 上 ホス ト ・ バ パッ ファ が フル に な る と 。, 
つ ホ スト ・ バ ッ フ ァ ディ スク へ 格納 され る . 


ホス ト ・ バ ッ フ ァ に 格納 され た デー タ を 。, 書き 込み 
の ロジ カル ・ セ クタ と し て アク セス する . 


ロジ カル ・ セ クタ 3 の 書き 込み . 
ミ まだ ディ スク に は 格納 され な い . 
CPZM の BDOS は , あく まで | 
セク タ を I28 バ イト と し て 扱 


さ 党 S 六 尋 
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実際 の ディ スク か ら 読 み 出 さ 
れ た | フィジカル ・ セ クタ は , 
128 バ イト の 整数 倍 の "ホス ト 
・ バ ッ フ ァ ” に 格納 され , | セ 
クタ が |I28 バ イト の ロジ カル 
・ セ クタ "と し て BDOS か ら ア 
クセ ス さ れる . 

ユー ザー 側 か ら み れ ば , あ た 
か も 実際 の ディ スク が , 物理 
的 に | セク タ が I28 バ イト で 
ある よう に 思え る . 


ロジ カル ・ セ タタ 2 の 書き 込み . 
まだ ディ スク に は 格納 され な い . 


さ 党 S 蘭 國 


ロジ カル ・ セ クタ | の 書き 込み . 
まだ ディ スク に は 格納 され な い . 


Figure-1.1.15 プロ ッ キ ング , デブ ロッ キン グ の 原理 
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ご の よう に 、 ロジ カル ・ セ クタ 2 一 4 は 。 ディス ク を 再度 アク セス する こと な く 。 ホ スト ・ バ ッ フ プ 
ァ を 介し て BDOS に より 処理 され ます . 

この 図 の 例 で , BDOS が ロジ カル ・ セ クタ 1 を 読も うと し て , BIOS が 自動 的 に フィ ジ カ ル ・ セ クタ 
1 を ホス トバ ッ フ ァ に 読み 出し た 時 点 を , 


HOST BUFFER DATA IS ACTIVE 


と 言い 。 プ ロッ ク ・ デ プロ ッ ク ・ ル ー チ ン の フラ グ “HSTACT? を EEFH に し て , ロジ カル ・ セ クタ 1 
ー4 に 関し て は , ディ スク を アク セス する 必要 の な いこ と を 知ら せま す . 

デ プ ロ ッ キン グ は , この よう な 手順 を 各 フ ィ ジ カル ・ セ クタ で 繰り 返し ,。 で きる だ け 高 速 に ディ ス 
ク か ら デ ー タ の 読み 出し を 行う た め の ア ル ゴ リ ズム で ある 訳 で す . 


プロ ッ キ ング 

プロ ッ キ ング は , デブ プロ ッ キ ング の 動作 の 流れ と 全く 逆 の こと を 行い ます . Figure-1.1.15 の 「 プ ブロ 
ッ キ ング の 原理 」 に 示さ れ て いる 図 に 従っ て 解説 し まし ょ う . 

例え ば "SAVE” コ マン ド な ど で , デー タ を シー ケン シャ ル に ディ スク に 書き 込む 場合 に つい て 考え 
て み ま ず すず 、 

BDOS は 最初 に .。 まず ロジ カル ・ セ クタ 1 の 128 バ イト の デー タ を ディ スク に 書き 込 も うと し ます . 
し か し , この 段階 で は まだ ディ スク の フィ ジ カ ル ・ セ クタ へ の 書き 込み は 行わ れず , デー タ は BIOS に 
より , ホス ト ・ バ ッ フ ァ に 一 時 的 に 格納 され る に と ど め られ て いま す . この 状態 は , 


HOST BUFFER WRITE IS PENDING 


の 状態 で あり ,、 ブロック, デ プ ロ ッ ク ・ ル ー チ ン の フラ グ ,“HSTWRT” を FEFH に し て , フィ ジ カ ル ・ 
セク タ へ の 書き 込み を “見 合わ せ て いる ” こと を 知ら せま す . 

この "見 合 あ わせ” て いる 状態 は , ホス ト ・ バ バッファ が フル に な る か , ま た は 強制 的 な 書き 込み 命令 が 来 
る まで 続き , 図 の 例 で は , 4 ロジ カル ・ セ クタ 分 の 512 バ イト が 格納 され る の を 待っ て , フル に な る と 
同時 に , ディ スク の フィ ジ カ ル ・ セ クタ に 書き 込み が 行わ れ ま す . 

ディ スク へ の 書き 込み は , この よう な こと の 繰り 返し で あり , デブ プロ ッ キ ング と 同様 に 。 で きる だ 
け 高 速 に ディ スク に デー タ を 書き 込む た め の ア ル ゴ リ ズム で ある 訳 で す . 

デブ プロ ッ キ ング に お ける , 実際 の BIOS 内 で の デー タ の 流れ を , デブ ロッキン グ を 行っ て いな い 標 準 
ディ スク の 場合 と 対比 し て , 次 に 図示 し て お きま す . プロ ッ キ ング に つい て は , この 図 の 動作 の 流れ 
を 逆 に する だ け で す の で 省略 し ます . 
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単 密度 ディ スク (物理 的 な | セク タ が I28 バ イト ) の 高密 度 デ ィ ス ク ( 図 の 例 は 。 物理 的 な | セクタ が 512 

シー ケン シャ ル な 読み 出し 動作 . バイ ト ) の シー ケン シャ ル な 読み 出し 動作 。 

1 フィ ジ カ ル ・ セ クタ ー ニ 1 ロジ カル ・ セ クタ の 場合 
OH 


90H 1pMeto ラ ァ 80H | DMA 
遇 細 旨 | (I28 バ イト ) 90H) 2 ファ 
は 刀 理 ゅ 処理 


!「 フ ィ ジ カル ・ セ クタ ニテ 4 ロ ジ カ ル ・ セ クタ の 場合 


フィ ジ カ ル ・ セ クタ | を リー ド 
つま り ロ ジ カ ル ・ セ クタ (|),(2), 
(3).(4) を リー ド . ー 1 8426Y ト の 
/ ャ ホス ト ・ バ ッ フ ァ 


1 (HSTBUF ) 
ke 
Be 

加 


ーー 動作 の 流れ 


デブ ロッ キン グ を 行っ て いな い 騙 証 
場合 6 叶 処 理 


それ ぞ れ の 処理 は 128 バ イト 単位 で , 


それ ぞ れ の 処理 が , 128 バ イト 
DMA バ パッ ファ を 介し て 行わ れる . 


単位 で ,DMA パ バッ ファ を 介し て 行わ れる こと は , 標準 ディ ス 
ク の 場合 と 同じ で ある . 


Figure-1.1.16 デブ プロ ッ キ ング を 行う 場合 と , 行わ な 場合 


注 ) プロ ッ キ ング , デブ プ ロッ キン グ の アル ゴリ ズム に つい て は , 非常 に 専門 的 に な り ま す の で , デ 
ジタル リサ ー チ 社 の 「CP プ M 2.0 ALTERATION GUIDE」 の 付録 GC の プロ ッ キ ング , デ 
プロ ッ キ ング の アル ゴリ ズム の 骨子 を 示し た ソー ス ・ リ スト を ご 覧 下さ い . また , この ソー ス ・ 
ファ イル は , 標準 CPM の ディ スク の 中 に も “DEBLOCK . ASM′ と し て 含ま れ て いま す . 
た だ し , この “DEBLOCK . ASM” は , 1982 年 の 前 半 よ り 前 の リリ ー ス の も の に , 最後 の 128 
バイ ト が ディ スク に 書き 込め な いこ と が 発生 する 問題 点 が あり まし た . この アル ゴリ ズム を そ 
の まま 組み 込む ユーザ ー は 注意 し て お いて 下さ い . 


以上 , CBIOS の 骨子 に つい て 解説 し て きま し た が , これ ら の 知識 を 基 に , CBIOS を 作成 ある い は 変 
更 し た 場合 の CPM シス テム へ の 組み 込み と , その シス テム ・ デ ィ ス ク の 作成 に つい て は , 「 実 習 CP ン 
M」 の 4.10 章 と 4. 9 章 の , MOVCMP と SYSGEN の 項 を 参照 し て 下さ い . 
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1.2 BDOS( 基 本 ディ スク ・ オ ペレ ー テ ィング ・ シ ステ ム ) 


BDOS は , プラ ッ ク ・ ボ ックス の モジ ュー ル で あり , ユー ザー が それ に 手 を 入れ る と いう こと は あり 
ませ ん . し か し , BDOS の 持つ 多く の 機能 は 、 ユー ザー が 有効 に 利用 で きる よう に , その すべ て が \ シ 
ステ ム ・ コ ー ル ” と いう 形 で 公開 され て いま す . 

シス テム ・ コ ー ル は , 次 章 (2 章 ) に お いて , その すべ て の 機能 を サン プル ・ プ ログ ラム 付き で 解 
説 を 行っ て いま す の で 参照 下さ い . また , 当 「BDOS」 の 項 は , 2 章 の 「 シ ステ ム ・ コ ー ル 」 の ファ イ 
ル 操 作 に 関す る も の と は 密接 に 関係 し て お り , それ ら を 別々 に 解説 する こと や 理解 する こと は 不可 能 
で す . よっ て , 2 章 と 関連 し て 当 BDOS の 項 を 読ん で 下さ い . 

BDOS は プラ ッ ク ・ ボ ックス で す の で , その 解説 は ,、 シス テム ・ コ ー ル に 関連 する も の に な り ま す . 
その 中 で も 特に 重要 と な る , “ファ イル ” の 操作 の すべ て に 関係 する FCB” (File Control Block) 
を 中 心 に 解説 を 行い まし ょ う . 


1.2.1 ファ イル ・ コ ント ロー ル ・ ブ ロッ ク (FCB) 


ファ イル ・ コ ント ロー ル ・ ブ ロッ ク (FCB) は , CPM が ファ イル の 各種 操作 を する た め に 必要 な , 
ファ イル や , その ファ イル の ディ スク 上 の 格納 場所 な ど ,。 “ファ イル "に 関す る すべ て の 情報 を 持っ た 
プロ ッ ク の こと で あり , それ ぞ れ の ファ イル の 1 つの ディ レク トリ に 対し て 1 つの FCB を 持っ て いま 
す . 

FCB は , ファ イル が アク セス され て いな い 定 常 状態 で は ,. その ファ イル が 存在 する ディ スク 上 の デ 
ィ レ クト リ ・ エ リア に 格納 され て いま す ., 今 ま で 普通 に , パフ ァイル の ディ レク トリ と 呼ん で いた も 
の は , 実は ディ スク に 格納 され た 状態 の "ファ イル の FCB/ で あっ た 訳 で す . 
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Figure-1.2.1 8 イン チ ナチ 標準 ディ スク の ディ レク ト リ ・ エ リア の FCB を 見 る . 
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まず , 8 イン チ 標 準 デ イィ スク の ディ レク トリ ・ エ リア の FCB を 実際 に 見 て み ま し ょ う . ディ レク ト 
リ ・ エ リア は , トラ ッ ク 02 の セク タ 01 か ら 始 まっ て いま す が (実習 CPM の 2. 3 章 参 照 )、 その 一 番 
最初 の 部 分 を ダン プ し て み ま す . シン クウ ェ ア ・ ラ ブ ズ 社 の “CPZM ユ ー テ ィ リ ティ VOL.1′ の 中 か 
ら の セク タ ・ ダ ンプ ・ プ ログ ラム を 使い ます . 


この リス ト に は , 4 つの ファ イル の FCB (通常 この 場合 は ,。 ディ レク トリ と 呼ば れる ) が 示さ れ て 
いま す . その 中 の ファ イル PIP . COM” に つい て , その 内 容 を 次 に 示す リス ト で 解説 し ます . 


SA 


夫 押 い 


ト 2 
還 = こ 共 維 ュ っ っ 
OC OD oE OF 10 11 12 13ioo oo oo oo oo oo oo ool 


Figure-1.2.2 ディ レク トリ ・ エ リア の 1 つの ファ イル の FCB の 内 容 . 


ディ スク 上 の ディ レク トリ ・ エ リア の FCB は , それ ぞ れ の ファ イル に 対し て , この よう を な を 形式 で 格 
納 さ れ て いま す . これ ら の FCB は , ファ イル の オー プン , MAKE, リネ ー ム , デリ ー ト な どの ファ ン 
クシ ョ ン を 行う 場合 , 該当 ファ イル の も の が メモ リ 上 の FCB エ リア に コピ ー ミ され , それ を 基 に リー ド グ 
ライ ト な どの 各種 の 処理 が 行わ れ ま す . メモ リ 上 の FCB は , ファ イル 操作 が 行わ れる に 従っ て 更新 さ 
れ て 行き , 書き 込み 操作 が 行わ れ た 場合 は , 最後 の バク ロー ズ ? の 実行 に より , 元 の ディ スク 上 の デ 
ィ レ クト リ ・ エ リア に 戻さ れ ま す . つま り は IFCB が 更新 され た こと に な り ま す . 

次 に ,。 ディ スク 上 の FCB が , "ファ イル の オー プン "の ファ ンク ショ ン の 実行 に より , メモ リ の デフ 
ォ ー ル ト の FCB エ リア (5CH-7FH) に コピ ー さ れる こと を , 実際 に 示し て み ま し ょ う . 

まず , 任意 の ファ イル を オー プン し て , 何 も せ ず そ の まま CPM に 戻る 簡単 な プロ グラ ム を 作り ま 
す .。 ファ イル の オー プン は , シス テム ・ コ ー ル の 15 番 で す ( 2 章 を 参照 下さ い ). 

その プロ グラ ム FCBTEST′ の アセ ンプ ブル 後 の PRN リ スト を 次 に 示し ます . 
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>TYPE FCBTEST .PERN / 


Q1o0O RG 100H 

QO1OO QOEQF MV C。15 5 
eo 
olo5 CpoSoo CaLL ooo5H 

O1O C9 RET - CPZM へ 戻る . 

0109 END 


仙 > 


Figure-1.2.3 任意 の ファ イル を オー プン し て , その まま CPM に 戻る だ け の プロ グラ ム の PRN リ スト . 


実習 され る 方 は 。 この リス ト か ら ソ ー ス ・ フ ァイル を 作り , アセ ンプ ブル し た 後 。 "FCBTEST . COM" 
を 作成 し ます . た だ し , 後述 の CPM と は 独立 し た モニ タ が な いと , 結果 の 確認 が で きま せん . 

で は , この プロ グラ ム を 実行 し て み ま し ょ う . Figure-1.2 .1 一 2 に 示さ れ て いる も の と 同じ ディ スク 
上 の プ ァ イル ドラ イプ B- 上 の "PUP. OOM' を 。 この アロ グラ ム に よっ て オー ブン シ し て み ま す 。. 


A>FCBTEST BaPIP。CDMN) - ブロ グラ ム の 実行 、 ドラ イブ B : 上 の PIP. COM ガ オー ブン され る . 1 


人 > オー プン され だ 後 CP/ M に 戻る . 


Figure-1.2.4 プロ グラ ム の 実行 . ドラ イブ B : 上 の PIP . COM が オー プン され る 。. 


ディ スク が 数 回 アク セス され た 後 , CPM に 戻り まし た . その 間 に , ファ イル “PIP . COM” が オォ 
ー プ ン さ れ ま し た .。 この プロ グラ ム は , ファ イル を オー プン し た まま の 状態 で CPM に 戻る の で , 現 
時 点 の メモ リ 上 の FCB エ リア は , ファ イル が オー プン され た 時 の 状態 を 保っ て いま す . その 時 の メモ 
リ 上 の FCB 付 近 の 内 容 を , 筆者 の マシ ン の CPM と は 独立 し た 別 の モニ タ に より ダン プ し て み ま し ょ 
う 。 
注 ) CPM の DDT で は , 現在 の FCB の 内 容 を 壊さ ず に ダン プ す る こと は で きま せん . 
メモ リ 上 の 現在 の FCB ア ドレ ス は , デフ ォ ー ル ト の 5CHー7FH で す . 


この ダン プリ スト の FCB ェ リア の 内 容 と , Figure1.2 .1-ー2 の リス ト の 内 容 と を 比較 し て 下さ い . デ 
ィ ス ク 上 の ディ レク トリ ・ エ リア の FCB が , この メモ リ 上 に コピ ー さ れ て いる の が 分 か り ま す . 


36 


BDOS( 基 本 ディ スク ・ オ ペレ ー テ ィング ・ シ ステ ム ) 


デフ ォ ー ル ト の FCB エ リア . 
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Figure-1.2.5 ドラ イブ B : 上 の ファ イル “"PIP . COM′ が オー プン され た 時 点 の FCB エ リア 付近 の ダ 
ンジ 


Figure-1.2.4 に 示し た , 当 プ ログ ラム の 実行 の コマ ンド ・ ラ イン , 
A>FCBTEST_」B : PIP. COM 


に よっ て , な ぜ ~B : PIP. COM” が , この プロ グラ ム の 対象 ファ イル と な る の か は , 後程 解説 し ま 
す 


次 に , FCB が どの よう に 構成 され て いる の か , その フォ ー マ ッ ト を 図示 し ます . アド レス は , CP ブ 
M が デ ヂ デフォー ルト と し て 設定 し て いる 5CH-7CH を 記入 し て あり ます . 


シー ケン シャ ル ・ フ ァイル の 場合 は , 00-32 の 33 バ イト を 使用 し . ラン ダム ・ フ ァイル の 場合 は , 
00-35 の 36 バ イト を 使用 し ます . 

「Figure-1.2.6 に , ドラ イブ B : 上 の ファ イル `PIP.COM" が オー プン され た 直後 の FCB を 示す Fi- 
gure-1.2.5 を 当て は め て みて 下さ い . 

FCB は , 通常 , アド レス 5CH に 置か れ ま す が , 必要 で あれ ば TPA (トラ ンジ ェ ン ト ・ プ ログ ラム ・ 
エリ ア ) の どこ に 置い て も か まい ませ ん . 特に 複数 の ファ イル を 同時 に アク セス する 場合 は , 2nd フ ァ 
イル 以上 の FCB は , TPA の どこ か に 置か ざる を 得 な いこ と に な り ま す . 


づ フ 
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ファ イル 名 (最上 位 ビ ピット を 0 に する こと ) 


(プラ イ マ リ . ネ 一 ム ) (エク ステ ンション ) 


bit7= ニ 1 の 時 *R プ 0* フ ァイル 0 一 |28 の 値 . 


bit7= ニ | の 時 SYS? フ ァイル 0 一 3| の 値 . 最 初 に ユー ザー が 


に 00 を セッ ト す る . 
Il6…P : 


00 … ロ グイ ン ・ ディスク 


シス テム が 内 部 で 使用 


開 陀 2000 ッ ト す る . 


Figure-1.2.6 FCB の 構成 
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1.2.2 プロ グラ ム 実 行 時 の コマ ンド ・ ラ イン と FCB の 関係 
Figure-1.2.4 に 示さ れ て いる プロ グラ ム を 実行 する 際 の コマ ンド ・ ラ イン は , 


Ax: プロ グラ ム 名 こよ 対象 ど だ な る ファ イル 名 (xi:。 デ : は ドラ イブ 名 ) 


と いう 形式 を と っ て いま す . 

Figure-1.2.3 に 示さ れ て いる この プロ グラ ム は , 対 象 と な る ファ イル 名 を , アドレス 5CH か ら の FCB 
に セッ ト し な けれ ば な り ま せん . し か し この 仕事 は , 上 の コマ ンド ・ ラ イン を 実行 する こと に より , 
CCP が 自動 的 に 行っ て し まっ た の で す . 

この 機能 は , 各種 アプリケ ーション ・ プ ログ ラム を 作成 する 上 で , 利用 する 場合 が 非常 に 多く , 基 
非 と も 理解 し て お か な けれ ば な ら な い 機 能 の 1 つ で す . 

一 般 的 に は , 決 の よう な コマ ンド ・ ラ イン の 形式 で , 2 つの 対象 と な る ファ イル 名 (1st file, 2nd file) 
を , 5CH か ら の FCB に セッ ト す る こと が で きま す . 


A>x : program . extuux': 1stfile . extLJx”: 2ndfile . ext_iabcxyz…… / 


この よう な コマ ンド ・ ラ イン を 実行 し た 場合 ,、 FCB に は どの よう に 格納 され る か , 実際 に 示し て み 
まま で 。 

その 準備 の た め に まず , “RET” 命 令 (リタ ン 命 令 . コー ド は C9H) だ け の , た っ た 1 バイ ト の ` プ 
ログ ラム ” を 作り ます . この プロ グラ ム は , プロ グラ ム 自 身 は 何 の 内容 も な く , 実行 され た 際 は , た 
だ , コン トロ ー ル を CP〆M に 戻す だ け の も の で す . その た め , この プロ グラ ム が 実行 され た 時 の コマ 
ンド ・ ラ イン は , CCP に よっ て 処理 され た まま の 状態 を 保つ こと に な り ま す . この 状態 の アド レス 00 
HHーFFH の スク ラッ チ ・ エ リア を , CPM か ら は 独立 し た 特別 の モニ タ で ダン プ し て 確認 し よう と い 


う 訳 で す , 
RET 命 令 1 バイ ト だ け の プロ グラ ム を 作る 手順 を 次 に 示し ます . 


Figure-1.2.7 ^RET? 命令 1 バイ ト だ け の プロ グラ ム を 作る . 
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以上 で ファ イル 名 DUMMY . COM” の , * 何 もし な いこ と を 実行 する "プロ グラ ム が で きま し た . 
で は , この プロ グラ ム を 決 の コマ ンド ・ ラ イン で 実行 し て み ま し ょ う . 
A>DUMMY。 B : 1STEFILE . ABCC : 2NDEILE . XYZ_LOPTION J 


実際 の 実行 例 を 決 に 示し ます . 


メイ ン ・ コ マン ド オプ ショ ン ・ コ マン ド ( 字 致 は , ス ペー ス も 飼 め て 35 字 =23H 字 ) 
A>DUMMY Bs 1STFILE.QBC C:2NDFILE.XYZ PTION/ ー…- こ の よう な コマ ンド ・ ラ イン を 実行 し て みる . 


Aa> の @ 【c) @ 


Figure-1.2.8 プロ グラ ム が 実行 され る 時 の コマ ンド ・ ラ イン と , FCB の 関係 を 調べ る 実験. 


この よう に , スク リー ン 上 は 何事 も な か っ た よう に CP/M に 戻っ て いま す . 

この 間 に CCP は , ① の プロ グラ ム ・ フ ァイル "DUMMY . COM” を , TPA に ロー ド し て 100H か ら 
実行 する の は も ちろ ん の こと で す が , プロ グラ ム を TPA に ロー ド し 終わ り , 100H ス ター ト で 実行 する 
直前 に ,。 コマ ンド ・ ラ イン の ② と ③ が , メモ リ 上 の FCB に セッ ト さ れる の で す . CCP が 使用 する デフ 
ォ ー ル ト の FCB ア ドレ ス は , 5CH か ら で す が , それ を 含む OH-FFH の エリ ア を , Figure-1.2.8 の 状態 
の まま , 筆者 の CPZM マ シン に 独自 に 設け た 特別 の モニ タ で ダン プ し て み ま し ょ う (DDT な ど で は , 
FCB の 状態 が 変化 し ます ). 


力 さ れ だ た オプ ショ ン ・ コ マン ド の 部 分 


02 は ドラ イブ フ B : ー マ ぃ 
6 : ) を 示し て いる . は フォ マッ ト に 征 つ て, FCBC コ ビー 
08 は ドラ イブ 6 : ) を た 本 


OOOO C さ QS BA OO QO CS Q6 aC 16 ささ OE O2| Q6 Q4 79 CD ミツ 
OO10 2 QO 15 Ca OO BA O6 OO OC 79 FE 1B| DA OF OO さ E ま 。。。。 ツー ジテ 
OO20 5 さ D さ EB DB EC OE O1 じ さ OC QO DS EA| CD 41 QO さ E 8。-....・・..-・・ 人 > 
OOSO BB BO D ミ EB DB EC BZ F2 41 OO DB EB| 77 23 CS さ 4 ..・。・.・・・・ 人 A。-・ ゅ 荘 。4 
OO40O OO DB EB E6 9D CB 1D C2 02 OO PPPKCCKKE エ レイ ルス 
oo5o CS So oo oo oo oo oo oo oo 5 く 4] 。P.・・・・・・・・・・18ST 
OO60 46 49 4C 45 20 41 42 43]OO FILE ABC・・-・.2ND 
oo7o oo FILE XYZ。。。。 < 
OOBO |2S!、20 42 さ A さ 1 53 54 46 49 4C 45 2E 41 42 4 さ 2O 


Bs15TFILE.ABC の 8 
OO90 14 さ | さ さ 2 4E 44 46 49 4 ヒ 45 SQ _20 4F SO|Cs2NDFILE.XYZ ロ P 7 
Qoao |54 |49 4F 4E[oo oo oo oo oo oo oo oo oo TION.。 
OF 0 だ GO OO SS us る さか Sa な 
oO QO OO Oo に 生生 
QO OO OO oO 9 和 !:eiel Wis まあ Re 
oo oo oo oo 
2F oo 12 oo 
ン ・ 


ーー 


この 和仁 "23" は , 入力 され だ コマ ンド 入力 され だ オプ ショ ンド が , 入力 され だ 時 の まま の 
ライ ン の オプ ショ ン ・ コマ ンド の 字数 お 状態 て, 80H か ら の / ツラ ファ ピコ ピー され て いる (アス キー 部 有 ) 
ガ 23H で ある こと を 示し て いる . * 


Figure-1.2.9 コマ ンド ・ ラ イン が FCB に コピ ー さ れる 様子 の 確認 . 
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CP/M が 使用 する デフ ォ ー ル ト の FCB ア ドレ ス は 5CH で す (ユー ザー・ プ ログ ラム で は , 任意 の ア 
ドレ ス に 設定 で きま す ). この ダン プリ スト の 5CH 一 7CH の FCB に は , オプ ショ ン ・ コ マン ド 部 の ② と 
が , Figure-1.2.6 に 示さ れ て いる フォ ー マ ッ ト に 従っ て 格納 され て いる こと が 分 か り ま す . た だ し , 
に つい て は , 通常 は シス テム 内 部 で 使用 きれ る 6CH か ら の エリ ア に 格納 され て いま す . 

一 方 。④ は , FCB に は 格納 され て いな いこ と に 注目 し て 下さ い . コマ ンド ・ ラ イン の ①, ②, ③, 
④ を 区 別 す る の は , それ ぞ れ の 間 に 置 いた スペ ー ス で す . そし て , ② と ③ の 先頭 に , ドラ イブ 名 が あ 
れ ば , それ ら は Figure-1.2.6 の “dr” の バイ ト に 示さ れ て いる よう に , ドラ イプ ・ コ ー ド に 変換 され 
て FCB に 格納 され ます . ドラ イブ 名 が な い 場 合 は ,、 ログ イン ・ デ ィ ス ク を 指定 し た と みな され , ドラ 
イプ ・ コ ー ド 00 が 格納 され ます . 

以上 の よう に , Figure-1.2.8 の コマ ンド ・ ラ イン を 実行 する と 、 プロ グラ ム が TPA に ロー ド さ れ , 
100H ス ター ト で 実行 され る 直前 に , コマ ンド ・ ラ イン の ② と ③ の 部 分 が FCB に , FCB の フォ ー マ ッ ト 
で 格納 され る こと が 理解 され た と 思い ます . 

さら に も う 1 つ , 重要 な こと が あり ます . 

アド レス 80H か ら の デフ ォ ー ル ト の DMA バ ッ フ ァ に , Figure-1.2.8 の コマ ンド ライ ン の ② 以 後 が , 
何 の 変更 も 受け ず に 入力 し た 時 の 状態 の まま で 格納 され て いる こと で す . その 先頭 アド レス の 80H に は , 
入力 され た オプ ショ ン ・ コ マン ド 部 の 総 入力 文字 が 格納 され ます . この 80H か ら の エリ ア に は , 入力 し 
た も の は すべ て , ④ 以 後 の 部 分 も 格納 され る の で す . 

この 80H か ら の バッ ファ に 格納 され る タイ ミン グ も , 先程 の FCB の 場合 と 同じ , 100H ス ター ト の 直 
前 で す . 

ユー ザー は , ユー ザー・ プ ログ ラム の 中 で , 前 者 の FCB に 格納 され た 2 組 の ドラ イプ 名 と ファ イル 
名 , それ に 後者 の アド レス 80H か ら の エリ ア に 格納 され た , 入力 され た まま の 状態 の オプ ショ ン ・ コ マ 
ンド ・ ラ イン を , 自由 に 利用 する こと が で きま す . 

例え ば , 

A>DDT_,ABCD . COM / 
A>DUMP_.OPQR . XYZ J 
A>ED_DUMP . ASM 


な ど は 前 者 の FCB を 利用 し , 


A>MOVCPM_.64* 
A>STAT_,PUN : =UP1: / 
A>PIP、,B : =ASM . COM [V] / 


な ど は 後者 の 80H か ら の バッ ファ を 利用 し て いま す . 
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CPM の 内 部 構造 と 機能 の 詳細 


いずれ に し ろ , これ ら の こと は , 次 章 の 「 シ ステ ム ・ コ ー ル 」 の ファ イル の 操作 等 に 関す 


る も の と は 密接 に 関係 する こと で あり , それ ぞ れ を 単独 で 理解 する こと は 不可 能 で す . よっ 
て , 湊 章 と 本 章 と は 一 体 で ある と 考え て 交互 に 参照 し て 下さ い . 


1.3 カナ 文字 へ の 対応 


日 本 の パー ソナ ル ・ コ ンピュータ の CPM は , すでに カナ 文字 対応 が で き て いる も の が 多い の で す 
が , そう で な い 標 準 CPM 上 で , カナ 文字 の 使用 が で きる よう に する た め の 変 更 箇所 を 示し て お きま 
し ょ う . これ は 筆者 が 「 標 準 CPZM ハ ンド ブッ ク 」 に も 紹介 し まし た が , ここ で は その 変更 作業 を 具 
体 的 に スク リー ン 上 の リス ト で 示し ます .。 

その 前 に , BIOS 内 の コン ソー ル 入 出力 ルー チン や , プリ ンタ へ の 出力 ルー チン な ど に は , 入出 力 デ 
ー タ の 最上 位 ビ ッ ト を 0 に する 操作 を 行っ て いな いと いう こと が 前 提 で す . 


"A>" の あと に カナ 文字 を キー イン で きる よう に する た め の 変 更 

コン ソー ル ・ コ マン ド ・ レ ベル で , カナ 文字 を 入力 で きる よう に する た め の 変 更 で す . こ れ を 行う と ,PIP 
コマ ンド の 文字 列 サ ー チ ン パ ラメ ー タ で ある , [S] や [Q] を ヵ カナ 文字 で も 使用 する こと が 可能 と な り 
ます . また , コン ソー ル ・ コ マン ド ・ レ ベル で な く て も , ED コマ ンド 内 の 文字 列 置き 替え や サー チ ・ 
コマ ンド の “S"。^F” な ど に も カナ 文字 の 使用 が 可能 と な り ま す . 

変更 箇所 は 基本 的 に は "MOVCPM . COM” を DDT で ロー ド し た 時 の アド レス 13F5H の デー タ , 7 
F” が 入力 キャ ラク タ の 最上 位 ビ ッ ト を 0 に する マス ク な の で , これ を "FEF” に で も 変更 し て , 新た 
に シス テム を 作り 上 げ れ ば よい の で す . 

実際 は , 次 の 実例 に 示す よう . に すれ ば 簡単 に 新 シ ステ ム が 作れ ます . CPM の マス ター・ デ ィ ス ク 
を コピ ー し て , それ を ドラ イブ A : に セッ ト し て 起動 し て か ら 始 め ま す . 
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カナ 文字 へ の 対応 


>12 さ 45/ 改造 前 の シス テム . “アイ ウエ オ “ と 入力 し だ が , ご の よう に “12345 と な り , 
12 さ 45? カナ と し て は 受付 け て いな い . 


>SYSBEN】 -- SYSGEN を 起動 . 

SYSGEN VER 2.2 

SDURCE DRIVE NAME (OR RETURN TO BKIP)A | ドラ イブ A: 上 の CPM シス テム を メモ リ 上 に ロー ド き る. 
SOURCE UN QA。 THEN TYPE RETURN) 

FUNCTIN CUMPLETE 

DESTINATIDN DRIVE NAME (DR RETURN TO REBOOT)) メモ リヒ 上 に ロー ドレ し だ まま CPM に 戻る . 


ご の ベー ジ 数 は , それ ぞ れ の CP ン M の BIOS の 大 き さ に より 異なる. オー バ す る の は か まわ な い . 
人 >BAVE_40_CPM。COM/ メモ リ 上 の CP ン M シ ステ ム の イメ ー ジ を , ファ イル *CPM. COM" と し て , デイ スク に セー ブ す る . 


A>DDT CPM。CONM / ----DDT を 起動 し , 先程 の "CPM.COM" を ロー ド す る . 

DDT VERS 2.2 

NEXT PC 筆 認 の だ め の ダ ンプ ブ . 

2900 O1OO 0 この YANI 7FH” に より の , 入力 キ ヤラ フタ の 最上 位 bit ザ 0 に され る . 

ーD1 さ FO。 1 さ FF / 由 

1 さ FO ES CD FEB CC E6 E1 C1 FE OD CaQ C1 CE FE OA CA へ 。 フ チ 。。 ハチ ホ 。。 ハ 
ーB13F5/ 
13FS 7F FF/ 
1SF6 E1 。/ 


TB リブ ー ト し て CPM に 戻る . 改造 され だ CP ン M シ ステ ム は メモ リ 上 に ある . 


"7F を "FF" に で も 変更 する (すべ て の キャ ラク フタ が 通る ). 


>SYSBEN / 

SYSGEN VER 2.2-……SYSGEN を 起動 . 

SOURCE DRIVE NAME (DR RETURN TO SKIP)_) スキ ッ プ する . 
DESTINATIUN DRIVE NAME (DR RETURN TO REBOOT) ! メモ リ 上 の 改造 され だ CPM シス テム を , 
DESTINATIUN UN QA。 THEN TYPE RETURN_/ 

FUNCTION COMPLETE 

DESTINATIDN DRIVE NAME (OR RETURN TO REBO ロ T) / -…- 改 造 シ ステ ム ・ デ ィ ス フ で き 上 り .CP ン M に 戻る . 


ドラ イブ A : の シス テム ・ ト ラッ ク に 組み 込む . 


Figure-1.3.1 カナ 対応 の CPM シス テム を 作成 する 手順 . 


IDey ト | 


人 Q> ア イ ウェ オリ 改造 され だ CPM を 起動 し だ 後 , バ "アイウエオ "と 入力 し て み だ . 


アイ ウエ オマ ご の よう に 受付 けら れ て いる . 


仙 > 


Figure-1.3.2 コン ソー ル ・ コ マン ド の レベ ル で も カナ が 使え ます . 
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CPM の 内 部 構造 と 機能 の 詳細 


DDT の ダン プ ・ コ マン ド の アス キー 表示 部 に カナ 表示 を させ る た め の 変 更 


これ も CPM の マス ター・ デ ィ ス ク か ら コ ピー し た “DDT . COM” を 準備 し て , 次 の 手順 で 行い 
家 ま 。 


A>DDT DDT。CON ) DDT を 起動 し , 自 分 自身 を ロー ド さ る. 
DDT VERS 2.2 
人 の --……… 人 用 の だ め の ダ ンプ . 


140O 0O10O この *CPI 7FH" で その 値 以 上 の キャ ラフ タ を *. "に し て し まう . 
ーDE さ O。 ESF ) ーー す 

OE3O _O5 OC 7D CS O5 OC FE [ZF] D2 4O OC FE 20 D2 C フ 7 OB 。。}。。- << 9。-、・・ ーー カナ は 表示 され 
ーSE さ 7 ) な い . 


OE さ 7 7F FF_ : そ れ を `FF* と すれ ば すべ て の キャ ラク マタ が, その まま コン ソー ル に 送ら れ 表 示さ れる . 
OE さ B D2 。) 


ーBO_) リプ ー ト し て CP ン M に 戻る . 


A>SAVE 19 DDT.COM ) メモ リ 上 の 改造 DDT を セー ブ す る . 改 千 DDT の で き 上 り . 


A>DDT DDT.COM/ …… 改 造 DDT を 起動 する . 

DDT VERS 2.2 

NEXT PC 

14OO O1OO 

ーDE さ O,E4F 」 

OESO O5 OC 7D CS O5 OC FE FF D2 40 OC FE 20 D2 C フ 7 OB ..) テ 。。. メ 9。 メ 双 。 

OE40 さ E 2E さく ヒビ 7 OB EB 2 SF OF 7D 9 6F 7C 9 EB C9 >。 テ 丸 。* 。)oI ノ | カナ 表示 され て いる 。 
ーBO / 


仙 > 


Figure-1.3.3 アス キー 表示 部 に カナ を 表示 させ る た め の DDT の 改造 . 
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2 意 全 シ ステ ム ・ コ ー ル 般 底 解 説 


シス テム : コ ー ル と は 


2.1 シス テム ・ コ ー ル と は 


シス テム ・ コ ー ル と は , CPZM が 持っ て いる コン ソー ル な どの 各 周 辺 装置 と の 入出 力 機能 や , ディ 
スク ・ フ ァイル の 各種 操作 な どの 機能 を , 外部 の ユー ザー・ プ ログ ラム か ら 使用 する こと を 許し た CP/ 
M の “シス ネス デ ム ・ サ ービス 7 の と と で す 。 

シス テム ・ コ ー ル は , “ファン クション ・ コ ー ル ” や 。 “スー パー バイ ザ ・ コ ー ル ” と も 呼ば れ て お 
り , CPM に と っ て この 機能 は 大 変 重要 な も の で あり , シス テム ・ コ ー ル あっ て の CP/M と 言っ て も 
良い で し ょ う . 

CPM が , 今日 ,. マ イク ロコ ンピュータ の OS の 標準 に な り 得 た の も , この 多く の 機能 を 持つ シス テ 
ム ・ コ ー ル を , 使い や すい 形式 に 整備 し て , ユー ザー に 提供 し た 点 に ある と 筆者 は 考え て いま す . 
ハー ドウ ェ ア に 依存 し な い , この シス テム ・ コ ー ル を 利用 し て , 各 ソ フト ウェ ア ・ メ ー カ ー は , い 
っ せい に 各種 の ソフ トウ ェ ア を 製品 化し まし た . つま り , シス テム ・ コ ー ル を 使っ た これ ら の ソフ ト 
ウェ ア は , CPM マシ ン な ら ば , すべ て の 機種 で 実行 する こと が で きる の で す . そし て , これ ら の ソ 
フト ウェ ア が , 今 HCP ン M を 取り 巻く ,。 お び た だ し い 数 の ソフ トウ ェ ア 群 と な っ て いる の で す . 


さて , み な さん が , CPM 上 で 実行 する 何ら か の プロ グラ ム を , アセ ンプ ブラ で 作る 場合 を 想定 し て 
下さ きい. まず , コン ピュ ー タ の 入出 力 で 最も 基本 的 な を 。 コン ソー ル の 入出 力 に つい て 考え て み ま し ょ 
だ 

「 キ ー ボ ポー ド か ら 1 文字 入力 する プロ グラ ム と , スク リー ン へ 1 文字 出力 させ る プロ グラ ム を 作り 
な さい . 」 と いう 問題 で す . 

さて , あな た な ら ど うし ます か ? 

エー と 。 こ の ヨコ ヨ ジ ピュ ー ク の キー ボー ド ・ デ ー タ の 入力 ポー ト * ア ドレ ス は , 確か xx 和 HI で 。 ス テー 
タス bit は bit0 で , …… と 考え 始め た 方 は どう し て も この 章 を 読ま な けれ ば な り ま せん . こん な に 便 
利 な 機能 が ある の で す . 

問題 の アプ ログラム は , シス テム ・ コ ー ル を 使う と , 次 の よう に スマ ー ト に 解決 し ます . 


コン ソー ル 入 力 (通常 は キー ボー ド か ら 1 文字 入力 ) 


入力 が あれ ば , 入力 デー タ が A レ ジス タ に 入っ て いる 


イフ 


至 シ ステ ム ・ コ ー ル 徹底 解説 


一 方 , コン ソー ル へ 1 文字 出力 する 場合 は 次 の よう に な り ま す . 


コン ソー ル 出 力 (通常 は スク リー ン に 1 文字 出力 ) 
出力 データ を A レ ジス タ に 持っ て いる 場合 . 
1 


了 2 あ 0 
この よう に わずか 2 一 3 ステ ッ プ で これ ら の 機能 が 記述 で きる の で す . そし て , 重要 な こと は , こ 
こ に は , 先程 の ポー ト ・ ア ドレ ス の よう な ,。 コン ピュ ー タ の ハー ドウ ェ ア に 関す る こと が , 表面 に は 
一 切 現 れ て いな いこ と で す . 従っ て 機種 の 異な る どの よう な CPM マシ ン で も , この プロ グラ ム は 共 
通 に 動作 する こと に な り ま す . 
シス テム ・ コ ー ル の 一 般 形 を 次 に 示し ます . 


シス テム ・ コ ー ル の 一 般 形 


MVI C, function No. 
(LXI D, address ある い は MVI E, parameter) 
CALL 0005H 


( 結果 を 返す も の は , 結果 が A あ る い は (H, L) レジ スタ に 格納 され る .) 


つづ つまり 。 


放 フ ァ ン クシ ョ ン No. を “C レ ジス タ ” に セッ ト 。, 
六 ( ファ ンク ショ ン に よっ て は , パ パラ メー タ を (D, E) ペ アレ ジス タ ま た は E レ ジス 


タ に セッ ト .) 
友 アド レス 0005 番 地 を CALL. 
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シス テム ハム ・ コ ー ル と は 


この ,。 2 ステ ッ プ また は 3 ステ ッ プ で , Figure-2.1.1 の シス テム ・ コ ー ル 一 覧 表 に ある , すべ て の 
機能 が 実現 で きる の で す . 

CALL し た 結果 は , コン ソー ル へ の 1 文字 出力 の よ う に , 直接 に 動作 や 現象 と し て 現れ る ファ ンク シ 
ョ ン の も の と , 結果 の デー タ が 得 ち られ る ファ ンク ショ ン で は , 1 バイ ト の 場合 A レ ジス タ に , 2 バイ 
ト の 場合 (H, L) ペア レジ スタ に デー タ が セッ ト さ れ て 戻る も の が あり ます (CPM ver1.4 と コン 
パチ ビリ ティ を 保つ た め , HH, し レジ スタ と 同じ 値 が , A, B レ ジス タ に も 格納 され て いま す ). つま り , 
結果 は , 


文 動作 と し て 現れ る . 
衣 1 バイ ト の 結果 は A レ ジス タ に . 2 バイ ト の 結果 は (H, L) ペ アレ ジス タ に 格納 され 


て いる , 


この 機能 が , CPZM の システム ・ コ ー ル / と 呼ば れる も の で す . 
次 軸 に シス テム ・ コ ー ル の ファ ンク ショ ン 一 覧 表 を 示し ます . 


シス テム ・ コ ー ル に お ける スタ ッ ク の 扱い に つい て 

シス テム ・ コ ー ル され た 内 部 で は , 独自 の スタ ッ ク ・ ポ イン タ が 使用 され て お り , ユー ザー・ プ ロ 
グラ ム 上 の スタ ッ ク は 一 切 消費 し ませ ん . よっ て ユー ザー は , シス テム ・ コ ー ル 内 部 で の スタ ッ ク の 
消費 を 考慮 する 必要 は あり ませ ん . 

ここ で の シス テム ・ コ ー ル の サン プル ・ プ ログ ラム は , 簡素 化 の た め に , ほとん どの も の は ユー ザ 
ー・ プ ログ ラム で スタ ッ ク ・ ポ イン タ を 設定 せ ず に , CCP 内 の スタ ッ ク を その まま 継続 し て 使っ て い 
ます . CCP か ら ユ ー ザ ー・ プ ログ ラム に コン トロ ー ル が 移っ た 時 に , CCP が 使用 し て いた 7 レベ ル の 
スタ ッ ク が 使用 可能 で す が , これ 以上 に スタ ッ ク が 深く な る プロ グラ ム の 場合 は ユー ザー・ プ ログ 
ラム で , 新た に スタ ッ ク ・ ポ イン タ を 設定 する 必要 が あり ます の で 注意 し て 下さ い . 
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人 至 シ ステ ム ・ コ ー ル 徹底 解説 


| 1 
に な も 二 | 
| | 3 区 
姜 | | 4 | 04 
| 1 5 | 
の 
央 | 07 | 
M | 8 | 08 | 
| 9 | 09 | 
| Ii0 | 0A | 


Ln | om | 


バ | 13 | 0D | ディ スク ・ シ ステ ム の リセ ッ ト な し すべ て の ディ スク が リセ ッ ト させ る 
| | !4 | OE | ティ スク ・ ド ライ ブ の セレ クト | ECー ド ライ ブ NM デフ ォ ー ル トド ライ ブ に 指定 され る 
ッ ーー 
。| 6 | IO | ファ イル の 2 ロー ズ |DEcFOB ァ F し ス A | 
ント し 7 | | 玩 カ の ファ イル の サー チ | DE-FGB ア ドレ ス 正宮 :A- デ ィ レク トリ コー ド 
(18 | 12 | の ファ イル の サー チ | 。 な し | ファ イル が な EACFFH 
。 19 | 13 | ファ イル の テリー ト 。 | DOEcFCB ア F レ ス | 
合 し 20 | 14 | シー タン シャ ル ・ リ ー ド | DE-FCBZF レ ス 正和 :A-00 
用 | し 2 | 15 | シー タン シャ ル ・ ラ イト | DE-FCB ア ドレ ス =〈。。 | 多 了 対 は ディ スク ッ フル:Ar00b 邊 
ファ イル の 作成 池 イ レク トリ ラル : ムーFFH 
| | 人生 し 23 | 17 | ファ イル 名 の 交 更 | DE-FCB ア ドレ ス =u ラテ イル が な い :AxFFH 
f| | 和信 し 24 | 18 | ログ イン ・ ベ クト ル の 取り 出し | な し | HLC ロ グイ ン ・ ペ ベク トル | 
ク | | 画 し 25 | 19 | ログ イン ・ デ ィ ス ク Ne の 取り 出し | "な し |Ac デ ィ ス 2Ne | 
入 | 26 | IA | DMA ア ドレ ス の セッ ト | DE-DMA ア ドレ ス や ペ 。 。 | DMA ア ドレ ス が セッ ト され る | 
遇 | 27 | IB | アロ ケー ショ ン ・ ア ドレ ス の 取り 軸 し | な し 。 | HL・ ア ロケ ーション ベク トル ・ ア ドレ ス | 
間 
係 | | べ | 29 | ID | R/O ベ クト ル の 取り 則 し 。。 | 。 な し 。 |Hk ペ タク トル  VV《 
ジ 
と 
20 20 | ユー ザー. コ ー ド の セッ ト / 取 り 出 し 
3 正常: AC00 
用 エラ ー : AO エラ ー コ ー ド 
可 
| 36 | 24 | ラン ダム ・ レ コー ド の セッ ト | DECFCB ア ドレ ス = ペペ 。 | FOB2r0-(2 こ ラン ダム ・ レ コー ド Fe | 
25 | ディ スク ・ ド ライ ブ の リセ ッ ト 
軸 使用 され て いな い 
| 40 | 28 | ゼロ : フ ィ ル を 伴う ラン ダム ・ ラ イト | DE-FCB ア ドレ ス 正常 A-00 エラ ー : A- エ ラー コー ド 


パラ メー タ の セッ ト 結果 
(DE レジ スタ また は E レ ジス タ へ ) . | (DE レジ スタ また は E レ ジス タ へ ) 


な し 
な 
RDR: (リー ダ ) か ら の 入力 
PUN : (バンチ) へ の 出 カ 
Eー キ ャ ラク タ 

入力 :EーFFH 出力 :Eー キ ャ ラク タ | 入力 :A- キ ャ ラク タ 出力 : コ ン ソー ル へ 出力 
な 

コン ソー ル ・ パ ッ フ ァ へ の 読み 込み コン ソー ル か ら バ パッ ファ へ 入力 


CON: (コン ソー ル ) 入力 テー タス の チェ ッ ク 入力 あり :A-FFH 入力 な し :A~-00 
バー ジョ ン le の 取り 肖 し HP 人 MLVP/M し ー バ ー ジ ョ ン le 


注 ) HL レジ スタ と 同じ 内 容 が AB レジ スタ に も セッ ト さ れる . 
- 注 ) ファ ンク ショ ン 12 は , バー ジョ ン 1.4 で は 「 ヘ ッ ド の リフ ト ア ッ プ 」 の ファ ンク ショ ン で ある . 
注 ) デ ィ レ クト リ ・ コ ー ド : 128 バ イト 中 の 該当 ディ レク トリ の 位置 に より , 0 一 3 の 値 を と る . 


ら 0 


Figure-2.1.1 シス テム ・ コ ー ル 一 覧 表 


シス テム ・ コ ー ル 徹底 実習 


2.2 シス テム ・ コ ー ル 徹底 実習 


何 は と も あれ , これ ら の すべ て の 機能 を 簡単 な アロ グラ ム て で 実習 し て み ま し ょ う . 実習 用 の サン プ 
ル ・ プ ログ ラム は , それ ぞ れ の "シス テム ・ コ ー ル ” を , や さ し く 解説 する こと を 第 1 目的 と し まし 
た (アル ゴリ ズム の スマ ー ト さ な ど は , 問題 に し て いま せん の で あし か ら ず ). それ ぞ れ の プロ グラ ム ・ 
リス ト と その コメ ント 文 が . シス テム ・ コ ー ル に つい て の 何より の 解説 に な り ま す の で , リス ト を よ 
〈 見 て 下さ い . 

最初 に 示す 実習 プロ グラ ム Figure-2.2.1 だ け を みて も , シス テム ・ コ ー ル の 概念 は つか め る と 思い 
ます . 


ファ ンク ショ ン : 0… シ ステ ム ・ リ セッ ト 


CALL 手 順 
MVI | 
肝 旨 0005H | 
機能 
0 番地 へ の ジャ ンプ , ある い は Ctrl-C の キー イン を 行っ て リブ ー ト し た 場合 と 同じ 機能 で ある . この 
ファ ンク ショ ン を 実行 する と , “WBOOT” (BIOS 二 3 番地 ) へ の ジャ ンプ が 行わ れる . 


ファ ンク ショ ン : 1 … コ ン ソ ー ル か ら の 入力 


CALL 手 順 
MVI 1 
CALL 0005H 


男 
(入力 キャ ラク タ が A レ ジス タ に 格納 され て いる ) 
機能 
コン ソー ル ( 通 常 は キー ボー ド ) か ら の 入力 が あれ ば , 入力 キャ ラク タ を A レ ジス タ に 持っ て CALL か 
ら 戻 る . と 同時 に , コン ソー ル (通常 は は ス クリーン) に 入力 キャ ラク タ を 出力 (エコ ー・ バ ッ ク ) す 
る . 入力 が な い 場 合 は 、 入力 され る ま て 内 部 で ルー プア し て いる . 
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コン ソー ル へ の エコ ー・ バ ッ ク に 関し て は , Ctrl-S, Ctrl-P,。 タブ の 各 機 能 が 働く (ファ ンク ショ ン : 
2 を 参照 ). 


ファ ンク ショ ン : 2… コ ン ソ ー ル へ の 出力 


CALL 手 順 
MVI し 2 
(E) て 出力 キャ ラク タ 
CALL 0005H 
機能 


E レ ジス タ に セッ ト さ れ た だ ASCII キ ャ ラク タ を , コン ソー ル ( 通 常 は スク リー ン ) に 出力 する . この 出 
力 に 関し て は , コン ソー ル か ら Ctrl-S に よる ポー ズ や 。, 事前 の Ctrl-P に よる リス ト 出 力 , さら に 8 文字 
ご と の タプ 処理 が それ ぞ れ 機能 する . 


実習 プロ グラ ム ファ ンク ショ ン :0.1.2 


コン ソー ル か ら 1 文字 入力 する と , コロ ン ~ : ” に 続い て 入力 され た 文字 が , 255 文 字 連 続 し て | 
コン ソー ル に 出力 され , Ctrl-R を 入力 する と シス テム ・ リ セッ ト が 行わ れる . | 


ーーーーーーーーー ブ 


この よう な プロ グラ ム を 作っ て み ま し ょ う 。 
この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


人 >TYPE ロー1 一 2。PKN/ 


O1oOO 
STARTs 
O10O OEO2 MVI っ ょ コリ ヶ の ミ > コニー 
Oo102 1E2A MM oz 拉 0 
oO104 CDO5oo CALL oooshl 
O1O7 OEO1 * コ ン ソ ー ル 入力 "の シス テム る コー ル . 
Pe 人 CALL 。 o9osn | キー カ が ある まで , この 内 痢 で ルー プレ て 
oloc さ 249o1 STA BUFF キー 入力 デー タ を *BUFF* へ スト ア . 
O10F FE12 CPr 12H 』=^R | キー 入力 デー マガ が Otrl-R の と き は 。*RESET* 
0111 CA4401 Jz RESET | へ ジャ ンプ . 
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0114 1EsA 1 Eine コッ 0 提 0 シ っ 6: 
Oo118 CDo5oo EALE oooan アス ブフ ブー ニン に 
O11B O6FF MVr B。 255 出力 文字 数 の カウ ンタ .255 文 字 出 力 す る だ め . 
LDP 
O11D <a49O1 LDa BUFF キー 入力 デー マタ を A レ ジス タマ ビロード. 
O120 CS PUSH  B 
0121 OEO2 MV C,2 当 ば 和み 
O12 さ 5F MOV E。A コン ソー ル 出 力 の シス テム ・ コ ゴール . 
Q124 CDOS5OO CALL OoO5H A レ ジス タ の 文字 が スク リーン に 出力 され る . 
O127 C+1 POP B 
レン NZ nop |255 文 字 出 力 す る まで ルー プ 9 る . 
O12C OEO2 MVr Cy2 。 」 
MVi E。ODH キャリッジ ・ リ タン を スク リー ン に 出力 . 
CALL ooosHl 
Mvr に 
MVI gy OAH ? ラ イン - フ ィ ー ド を スク リー ン に 出力 
CALL ooo5sh 
oe OAM や う 1 度 ラ イン ・ フィー ド を 
JhP BTART 最初 ら 繰 の 返 し . 
RESET 
2 
CALL OOOSH リラ ロケ ラム は な い , Nm 
BUFFi DS 1 キー 入力 の 1 文字 パッ ファ . 
END 
注 ) コン ソー ル 入出 力 を , キー 入力 , ス フ クリーン 出力 と し て 説明 レ て いま す . 交 / 
Figure-2.2.1 ファ ンク ショ ン : 0, 1, 2 実習 プロ グラ ム の PRN 形 式 ソ ー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら , エディ タ を 使っ て アセ ンプ リ ・ ソ ー ス ・ フ ァイル を 作り , ASMーLOAD 
を 行い “0-1-2 . COM” を 生成 し 実行 し て み ま し ょ う . 


ファ ンク ショ ン :0,1.2 実習 プロ グラ ム の 実行 


*0-1-2 . COM” を 実行 する と ,。 プロ ンプ ト “*※? が 出力 され る の で , 適当 な 文字 を キー イン し ます . 
^・” に 続い て , 入力 され た 文字 が 255 文 字 出 力 さ れ ま す . 
文字 の キー イン 直後 に 素早 く Ctrl-S5 を キー イン し て , 255 文 字 の 出力 が ポー ズ に な る こと や , 事前 の 
Ctr-P に よる プリ ンタ へ の 出力 , タブ (TAB キー が な い 場 合 は Ctrl- 1 で 代用 で きる ) の 処理 な ど が 機 
能 す る こと を 確認 し て 下さ い . 
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実行 例 を 次 に 示し ます . 


A>0-1-2 ナ ーー コンソール 入力 "自身 の 表示 . 

{ーーーー 入力 され だ 文字 が 255 文 字 コンソ ー ル 出力 ” され て いる . 
2212141ATATTTST2TsT212721212121212721AT2TAT^T412T2T2121212121212121ATTT2TeT2T212T2T2T2T2121212121214121212T2121212121212121214121412121 TA1212121214121 
2TsTaT212TAT21212TT212TAT21212TA2T212121212121212T2T2T212T21212121212121212121212121212121212121212121212121212121212121212121212T2T2121212121212121212121212121 
TTA141AT4121A14TsTsTTeT21212141212T212127212121212121212121212127212121212121212121212121271212121212121212127212121212121212121212121212121212121212121212121 
212T212T2T2T2T2T21<T 12T2T2T2T2121<1 キャ セリ ッ ジ ・ リ タン と ライ ン ・ フ ィ ー ド が 行わ ね て いる . 

ー も う 1 度 ラ イン ・ フ ィ ー ド が 行わ れ て いる . 

*5: 55555555555555555555555555555555555555555555555555555555555555555555555555555 
55555555555555555555555555555555555555555555555555555555555555555555555555555555 


5555 ら 5 らら 5 らら 5 らら らら らら らら らら らら らら らら らら らら らら らら らら らら らら らら 5 らら らら らら らら らら らら らら らら らら らら 55555 ら 55555555555 
こら らら らら らら ららら 5 ら 5S555 ら 5 


キネ ア ェ アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア ア 
アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア 


アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア アア 
アア アア アア アア アア アア アア アア アア 


き へ R <-Otrl-R の 入力 に より \ シ ステ ム ・ リ セッ ト ” が 行わ れ , CP/ M に 戻 つ だ . 


仙 > 


注 ) Ctrl-S, Ctrl-P, Ctrl 一 | な どの 実験 も 行 つ て 下さ い . 


Figure-2.2.2 ファ ンク ショ ン :0, 1, 2 実習 プロ グラ ム の 実行 , 


| ファ ンク ショ ン : 8… リ ー ダ か ら の 入力 


CALL 手 順 
MVI C, 3 
CALL 0005H 


3 
(入力 デー タ は A レ ジス タ に 格納 され て いる ) 
機能 
ロジ カル ・ デ バイ ス の “RDR : ” に 入力 が あれ ば , 入力 デー タ を A レ ジス タ に 持っ て , CALL か ら 戻 
る . 入力 が な い 場 合 は 、 入力 され る ま て 内 部 で ルー プア し て いる . 
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ファ ンク ショ ン : 4 … パ ンチ へ の 出力 


CALL 手 順 
MVI C, 4 
(E。 由 示 ゲー タ 
CALL 0005H 
機能 


E レ ジス タ に セッ ト さ れ て いる デー タ を ,。 ロジ カル ・ デ バイ ス の “PUN : ?” に 出力 する . 


ファ ンク ショ ン : 5… リ スト へ の 出力 


CALL 手 順 
MVI C, 5 
(E) + 腸 力 デー タ 
CALL 0005H 
機能 


E レ ジス タ に セッ ト さ れ て いる デー タ を , ロジ カル ・ デ バイ ス の “LST : ? に 出力 する . 


実習 プロ グラ ム ファ ンク ショ ン :3,4.5 


~RDR :” デバ イス か ら 入 力 し た デー タ を , メモ リ 上 に バッ ファ し て 行き , Ctrl-P (10H) が 入 
力 さ れる と , 今 ま で に バッ ファ し た 内 容 を "PUN : "デバ イス へ 出力 する . また , Ctrl-L(0CH) 


が 入力 され る と , “LST : ” デバ イス に 出力 する . Ctrl-Z ( 1 AH) が 入力 され る と , 本 プロ グラ 
ム を 終了 し , CPM に 戻る . 


この よう な プロ グラ ム を 作っ て み ま し ょ う . 
この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 
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O103 E5 
O1O4 OEO さ る 
O106 CDOSQO 
O1O09 E1 


O1OA FE1O 
010C CA1EO1 
OiOF FEOC 
O111 CA くさ O1 
O114 FE1A 

! O116 CB 


Oo117 77 
O11B 23 


O119 さ 60O 
O1 1B C さ O さ O1 


011E 2148O1 
O121 7E 


仙 > 


Figure-2.2.3 


PUNOUT s 


LSTOUTs 


BUFF 


プア ジ ク シ ジョ ン ミ る う 。 


H ャ コー z の ミ Ne 
C, リー マダ 入力 "の シス テム ・ コ ー ル . 


アド レス ・ ポ イン で ある H, し L レ ジス タ を 
MG | 保護 し て いる . 


1OH ョ デビ | 人 つが Ctrl-P な ら ほ , バッ ファ され だ 内 容 を 
FUN ロ UT パン チ 出 力 へ . 
OCH =^L | 入力 が Ctrl-ー し な ら ば , パッ ツブ ファ され だ 内 容 を 
LST0UT リス ト 出 力 へ . 


1AH = グ Z 」 入力 が Ctri-Z な ら ば , 本 プロ グラ ム を 終了 レ , 


CPM へ. 
ML リー ダ 入 力 テ デー タ の バッ ファ リン グ . 
は 最終 デー タマ の 次 に , 恥ず *00* を スト ずる. 
ま 


START+ さ 次 の デー タ 入 力 ヘ ルー プ . 


本 | ツラ ァ の ら 出 カテ ー タ の 取り 出し 

* 。 。 ! デ ー タ が *00* の 場合 *START' へ の ジャ ンプ . 
STaRT | 計り 返し 

H 
C,4 陽二 

2 バン チ 出 力 * の シス テム ・ コ ー ル . 
855 | ヒレ ジス タ を 保護 し て いる 。 

H 
| X の テー タ 出力 ヘル ー プ 

PUNOUT+ さ 「 
AUFF | /( ッ ファ カ ら 出力 データ の 取り 出し . 

* デー タ が *00* の 場合 *START* ヘ ジ セ ンプ. 
9 繰り 返し . 
START 

H け 
1 ドリ スト 出力 * の シス テム ・ コ ー ル 

人 | \ リ スト 出力 * の シス テム 8 
QQO5H | H,L レ ジス タ を 保護 し て いる . 

H B 
LBTouUT+s| 交 の デー タ 由 力 ヘル ー プ . 

入力 デー ツタ の パッ ファ の 始ま り . | 


4, 5 実習 プロ グラ ム の PRN 形 式 ソ ー ス ・ リ スト . 


この ソー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , “3-4-5 . COM” を 生成 し て プロ グ 
ラム を 実行 し て み ま し ょ う 。 
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ファ ンク ショ ン :3.4.5 実習 プロ グラ ム の 実行 


プロ グラ ム “3-4-5 . COM* を 起動 きせ 外部 か ら *PUN : ? デ バイ ス へ データ を 送り 込み ます . 本 書 
の 場合 は 。 も う 1 台 の CPM マシ ン か ら , 互い の RS-232C と イン ター フェ イス ("PUN : /。“RDR : 7 
両 デ バイ ス に 割り 当て られ て いる ) を 介し て デー タ を 送っ て いま す . 

Figure-2.2.4 は , デー タ 送 り 出 し 側 の 実行 例 で あり , PIP に より , キー ボー ド 入 力 を “PUN :” デ 
バイ ス か ら 出 力 し て いま す . 実習 プロ グラ ム “3-4-5 . COM” が 起動 し て いる 受信 側 で は , この 出力 を 

*RDR : ” デバ イス か ら 入 力 し て , 各 動 作 が 行わ れる 訳 で す . 

Figure-2.2.5 は , 実習 プロ グラ ム を 実行 し た 時 の スク リー ン の 表示 例 で あり , Figure-2.2.6 は ,“LST :? 

デバ イス に 出力 され た 印字 例 で す . 


A>PIP PUNs=CONg) “CON : “(通常 は キー ボー ド ) 入 力 を *PUN : ” ガ ら 出 力 . 


ABCDEFBHIJKLMN ) し F 

O12 さ 4567 昌 9 LF 

abcdefqh1 jk1mn リ し F 

らら MO PU の が 衣 お りり 。 士 明 チ ー 基 5 ・” へ 出力 させ る . 


GPS モ ぃ vwxy ァ リト ビ 

へ PP へ 2 ーーー-OtrlP の 入力 に より . 上 記 デ ー タ を *PUN : / へ 出力 させ る . 

み : OoOtri-Z の 入力 に より , ブ プロ グラ ム *3-4-5* を 終了 させ , 
こち ら の PIP も 終了 させ る . 


注 ) LF は ライ ン ・ フ ィ ー ド ・ キ ー の 入力 を 表す . LF は Ctrl- り で 代用 で きる . 


Figure-2.2.4 この 実習 で の デー タ 送 り 出 し 側 CPM マシ ン の 実行 例 . 


人 > さ ー4ー5/ 
AA> ……CtrlZ が 入力 され だ の で , CPM に 戻 つた. 


Figure-2.2.5 ファ ンク ショ ン : 3, 4。 5 実習 プロ グラ ム の 実行 例 . Figure-2.2.4 で の デー タ が 入力 
され る . 


ABCDEFGHIJKLNMN 
O12 さ 4567 ロ 9 


abcdefghi j に 1 mn 


Figure-2.2.6 ファ ンク シ ジ ション: 3, 4。 5 実 計 プログラム に よる "LST : ” デバ イス へ の 出力 例 、 


5 フ 
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CALL 手 順 
入力 の 場合 
MVI C, 6 
MVI E, OFFH 
CALL 0005H 
息 
(入力 デー タ は A レ ジス タ に 格納 され て いる ) 


出力 の 場合 

MVI 人 

( 呈 ) *= 則 ガ デー タ 

CALL 0005H 
機能 
E レ ジス タ に FEFH を セッ ト し て CALL す る 場合 は コン ソー ル 入 力 , FFH 以 外 で あれ ば コン ソー ル 出 力 
と な る . 入力 の 場合 は , 入力 が あれ ば 入力 デー タ を A レ ジス タ に 持っ て , CALL か ら 戻 る . 入力 が な い 
場合 は , A レ ジス タ に 00 を 持っ て CALL か ら 戻 る (入力 が ある まで 待た な いこ と に 注目 ). 
出力 の 場合 は 、 EE レジ スタ に セッ ト さ れ て いる デー タ を , コン ソー ル に 出力 する . いずれ の 場合 も , 
ファ ンク ショ ン 1 お よび 2 で 有効 で あっ た Ctrl-S, Ctrl-P な ど は 機能 し な い . 


実習 プロ グラ ム ファ ンク ショ ン :6 


コン ソー ル ヘ へ パー” 記号 を 連続 し て 出力 させ な が ら , コン ソー 人 ル 入力 を 監視 し , 入力 が あれ ば , 
その キャ ラク タ を コン ソー ル へ 出力 する . 入力 が Ctrl-Z で あれ ば 本 プロ グラ ム を 終了 し て CP/ 


M に 戻る . 


この よう な プロ グラ ム を 作っ て み ま し ょ う . 
この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 
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AA>TYPE 6.FRN / 


1 FUNETIUN 6』 DIRECT CONSDLE 1/0 ロ 日 
Et sOTEraeusvasd エー ニー うー 日 
ロ RG 100H 
STARTgi 
MVI C, ら * ダ イレ クト ・ コ ン ソ ー ル 入出 力 "の "入力 "の 
8 2 
DOSOO [と \ る こと に 注目 . \ が 
SM ルー プ し な いこ と に も 注目 . 
DORA 内 ] 入力 (通常 は キー 入力 ) が あつ だ か どう か の 判 
C215O1 JNZ CHRDUT | 光 入力 が あつ だ 場合 ."CHROUT" に ジャ ン 
MVI C,6 な 0 コン ソー ル 入 出力 "の "出力 "の 
MVi E。*-* (シス テム ・ コ ー ル . “-“ 記 写 を コン ソー ル に 
CDO5oo CALL OOO5H ) 出力 する (通常 は スク リー ン に 出力 ). 
C3OQO1 JMP START  - 最 初 に 戻 つ て ルー プ . 
CHROUT 
CP1 1AQH 人 Z な ら 本 プロ グラ ム を 終了 レ 。 
RZ CPM へ 戻る 
MVI Pi |^ * ダ イレ クト ・ コ ン ソ ー ル 入出 力 " の "出力 "の 
MOV シス テム ・ コ ー ル . 入力 キャ ラフ タ を コン ソ 
CDOSoQ CALL kw | ー ル に 出力 さる. 
CS3OOO1 JMF START 最初 に 戻 つ て ルー プ . 
END 


Figure-2.2.7 ファ ンク ショ ン : 6 実習 プロ グラ ム の PRN 形 式 ソ ー ス ・ リ スト . 


この ソー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り 。 “6 . COM” を 生成 し て プ ブログ ラム 
を 実行 し て み ま し ょ う . 


ファ ンク ショ ン : 65 実習 プロ グラ ム の 実行 


プロ グラ ム 6 . COM” を 起動 する と , スク リー ン に ドー? 記号 が 連続 し て 出力 され ます の で , 適当 
に キー イン を 行う と ,。 キー イン され た キャ ラク タ が 表示 され て 行き ます . この プロ グラ ム は , キー 入 
力 を 監視 し な が ら , スク リー ン へ の 出力 を 連続 し て 行っ て いる 訳 で す . Ctrl-S, Ctrl-P の 機能 が 働か な 
いこ と も 確認 し て 下さ い . Ctrl-Z を 入力 する と , プロ グラ ム を 終了 し て CPM へ 戻り ます . 

この 実行 例 を 次 に 示し ます . 
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otrl-Z を 入力 づる と 本 プロ グラ ム を 終了 レ し .CP ン M へ 戻る . 


Figure-2.2.8 ファ ンク ショ ン : 6 実習 プロ グラ ム の 実行 . 


ファ ンク ショ ン : 7 …IO バ イト の 取り 出し 


CALL 手 順 
MVI C, 7 
CALL 0005H 


処 
(IO バイ ト の 値 が A レ ジス タ に 格納 され て いる ) 
機能 
アド レス 0003H の IO バイ ト の 値 を , A レ ジス タ に 持っ て CALL か ら 戻 る . 


ファ ンク ショ ン : 8 …IO バ イト の セッ ト 


CALL 手 順 
MVI (いい 
(E) 一 1O バ イト の 値 
CALL 0005H 
機能 
E レ ジス タ の 値 が , アド レス 0003H の 1O バ イト に セッ ト さ れる . 
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実習 プロ グラ ム ファ ンク ショ ン : 7.8 


プロ グラ ム 実 行 前 の IO バイ ト の 値 を コン ソー ル に 表示 し , 次 に , ロジ カル ・ デ バイ ス の ~RDR : “ 
と “PUN : ” に ,。 それ ぞ れ フィ ジ カ ル ・ デ バイ ス の 「UR1 : “UP1 : ” を 割り 当て , 割り 当 
て た 後 の IO バ イト の 値 を , 再び コン ソー ル に 表示 する . 


この よう な プロ グラ ム を 作っ て み ま し ょ う 
この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


A>TYPFE 7- 日 .PRN/ 


2 Sai 人 Me 83ECYtbgMESdCSizdet2e に Neo ュー H 
3 。 FUNCTIDN 7』 GET 1I/ ロ BYTE ま 
5 B』 SET 1/0 BYTE 上 
oioo で TE SS ま 
STARTs 
O1QO CD45O1 CALL CRLFOUT-…- 竹 帰 ・ 改 行 を コン ソー ル へ 出力 する サブ ルー チン . 
O10 さ OEO7 MVi C。7 |"O パ イト の 取り 出し ? の シス テム ・ コ ー ル . 
O1O5 CDO5oo CALL OOO5H | 現在 の IO バイ ト の 値 が 人 レジ スタ に 得 られ る . 
O1OB F5 PUSH PSM | 得 ら れ だ 向 レジ スタ の 値 を 16 進 で コン ソー ル 
O1O9 CD2601 CALL HEXDSPLY ) に 出力 する サブ ルー チン . 
O1OC F1 POP PSM | 人 Q レ ジス タ を 了 護 し て い る . 
O1OD E6C さ ANr 11*$OO*OO き 1 19 | PUNC* の ビッ ト を 0 フリ アレ 。 を と 
O1OF F628 ORi OO$10$10$OOB | に UR1: と UP1 : を セツ ト す る . 
4 っ 4 NOV E。 | CON. と LST: は 変化 させ な い . 
112 OEOB VI *O パ イト の セッ ト * の シス テム ・ コ ー ル . 
o114 CDo5oo CALL | 上 氏 レジ スタ の 填 O パ イト に セッ ト さ れる . 
O117 CD45O1 CALL CRLFOUT -- 復 帰 ・ 改 行 を コン ソー ル へ 出力 . 
O11A OEOZ7 MVI C。7 | AO/ (イド の 取り HH し "の シス テム ・ コー ル . 
O11C CDOSOQ CALL OOOSH | 変更 し だ |(O バ イト を 取り 出し て 再 表 示さ せる だ め . 
O11F CD2601 CALL HEXDSPLY -- 変 更 さ れ だ !O パ イト の 値 を 16 進 で コン ソー ル に 出力 . 
O122 CD4SO1 CALL CRLFOUT -- 寿 帰 ・ 改 行 を 出力 . 
O125 C9 RET 本 プロ グラ ム を 終了 し ,CP/M に 戻る . 
HEXDBPLYk 
O126 F5 PUSH PSM 
O127 OFOFOFOF RRC! RRC! RRC! RRC 
O12B CD2FO1 CALL HOUT1 
O12E F1 POP PSM 
O12F E6OF HOUT1』 AaNi OFH ペレ ジス の 休 を 16 送 で コン ソー ル に 表示 す 
O1 さ 1 Ce6 さ O aD1 さ OH る サ プ ル ー チ ン 
O1 さ さ FE さ A CPI さ AH 
0135 DASAO1 JC HOUT2 
O1SB C607 ADi 7 
0O13A CDSEO1 HOUT2』 CALL CONQUT 
O13D C9 RET 
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O1 さ E OEO2 CONOUT』 MVI 8 記 
O140 5F MOV E。A | ファンクション 2* の コン ソー ル 出 力 の サブ 
O141 CDO5oOO CALL OoOSH | レーMEM の ShS。 コシ 
O144 C9 RET 計 6 
CRLFOUT ょ 
oO145 さ EOD MVr A。ODH 
O147 CD さ EO1 CALL CONOUT | 
の ON MVI A。OAH [復帰 ・ 改 行 を コン ソー ル に 出力 する サブ ルー チン . 
O14C CD さ EO1 FALL CONoUT 
O14F C9 RET 
015O END 
A> 


Figure-2.2.9 ファ ンク ショ ン : 7, 8 実習 プロ グラ ム の PRN 形 式 ソ ー ス ・ リ スト 


この ソー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り , “7-8 .COM′ を 生成 し て プロ グラ 
ム を 実行 し て み ま し ょ う . 


ファ ンク ショ ン :7.8 実習 プロ グラ ム の 実行 


まず 最初 に 。STAT コ マン ド で , 現在 の フィ ジ カ ル ・ デ バイ ス の アサ イン (割り 当て ) 状況 を 見 て 
お きま し ょ う . この 実行 例 を 次 に 示し ます . 


A>STAT DEV=7 STAT コ マン ド で フィ ジ カ ル ・ デ バイ ス の 初期 の アサ イン 状況 を みる 。 
CDN』 is UC1g 

RDRs 3sw TTYa)、 , 2 か 

PUN:』 is Tryi | TTY : ^ で ある こと に 注目 . 


LSTi is LPTs 


仙 > 


Figure-2.2.10 実習 アプ ログラム 実行 前 の 各 デ バイ ス の アサ イン 状況 を 見 る . 


つい で に ,。 DDT コ マン ド で , IO バイ ト 付 近 を ダン プ し て お きま す 。 


>DDT) DDT に よる 実行 前 の IO バイ ト 値 の 確認 . 
DDT VERS 2.2 


ーDO。F ) アド レス 0-FH を ダン ブ . 

OOOO CS OS DA B3 さ OO CS QO BC FF OO FF OO FF OO FF OO ・・・ー ーー 上 
ー^ ヒ 1 

た と IO バイ ト . 


人 A> 


Figure-2.2.11 実行 前 の DDT に よる IO バイ ト の ダン デ プ . 
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この よう に 。"RDR : "。 "PUN : * 共に TTY :* に な っ て いま す 。 
で は , 実習 プロ グラ ム “7 一 8 . COM? を 実行 し て み ま し ょ う . その 実行 例 を 決 に 示し ます . 


A>7-8/ 実習 プロ グラ ム の 実行 .“RDR : "と *PUN : ? に *UR1 : YUP1 : ? を アサ イン ずる. 


8 -- 実 行 前 の IO バイ ト の 舘 . 
AB 実行 後 の |O 〇 バイ ト の 値 . 


A> ( 注 : この プロ グラ ム を も う 一 度 実行 する 場合 に は , 事前 に , リセ ツ ト ・ ボ タン に よる CPM の 再起 動 な ど で , 
IO バイト を 初期 値 ビ セット し 直し て 下さ い . さも な いと 同じ 値 が 表示 され ます .) 


Figure-2.2.12 ファ ンク ショ ン : 7, 8 実習 プロ グラ ム の 実行 , 
この よう に , 実行 前 の IO バイ ト の 値 は “83H′ で あり , 実行 後 は "ABH” に 変更 きれ て いる こと が 
表示 され て いま す . 


83H=10000011……Figure-2.2.10 の アサ イン . 
ABH=10101011……Figure-2.2 .13 の アサ イン . 


この よう に , プロ グラ ム の 目的 通り に IO バイ ト が 変更 きれ まし た が , これ を STAT コ マン ド で も 確 
認 し て み ま し ょ う . 


RA>STAT DEVsI/) STAT コ マン ド で , 実習 プロ グラ ム 実 行 後 の 確 認 を する . 
CONI is UC1s 

RDR』 is UR1g TTY : 一 UR1 : 

結 NKK np ェ を 潜 生 を てい 

LSTs is LPTs 


> 


Figure-2.2.13 実習 プロ グラ ム の 実行 後 の STAT コ マン ド に よる 結果 の 確認 . 


一 応 。 DDT コ マン ド で , IO バイ ト 付 近 を ダン プ し て み ま し ょ う . 


A>DDT) DDT に よる 実行 後 の IO バ イト 値 の 確認 . 
DDT VERS 2.2 


ーDO。F / 0ーFH を ダン プ . 


QOQOO C さ 0 さ 3 DA AB OO C さ OO BC FF OO FF OO FF QO FF OO .-. 
- 人 で 


谷 > 


IO バイ ト . 


Figure-2.2.14 実行 後 の DDT に よる IO バイ ト の ダン プ . 
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目的 通り に アサ イン され て いる こと が 確認 され まし た . 


この ウ アァ シク ショ ジミ 7、 8 に より 、 ニー ザー・ プ 喜 グ ラム 中 で 。 自由 だ ジィ ジジ カル * デ イズ の 
選択 が 可能 に な る 訳 で す . 


| ファ シク ショ ン : 


ファ ンク ショ ン : 9… 文 字 列 の プリ ント アウ ト 


CALL 手 順 
MVI CC 9 
(D, E) 文字 列 ア ドレ ス 
CALL 0005H 

機能 


文字 列 が 格納 され て いる メモ リグ の 先頭 アド レス を (D, E) レジ スタ に セッ ト し て CALL す る と, 文字 
列 の 最後 を 示す `$” 記号 (24H) が 来る まで , 文字 列 を コン ソー ル に 出力 する . 
Ctrl-S, Ctrl-P, タプ 処理 な どの コン トロ ー ル は , ファ ンク ショ ン : 2 と 同様 に 有効 で ある . 


実習 プロ グラ ム ファ ンク ショ ン :9 


プロ グラ ム を 実行 する と , Morning の M か , また は Night の N か を キー イン する よう メッ セー ジ 
が 表示 され る . 

そこ で , M を キー イン する と ,“GOOD MORNING…… “と 応答 が あり , N を キー イン する と “GOOD 
NIGHT…… ” と 応答 する . 

Ctrl-Z を キー イン する と , プロ グラ ム を 終了 し て CPM へ 戻る . 


この よう な プロ グラ ム を 作っ て み ま し ょ う 、。 
この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


AzTYPE 9-PRN/ 


#ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ま 
日 FUNCTIDN 9』 PRINT STRING 日 


ーーーー ニ ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ニ ーーー ニニ ーーー# 


ORG 100H 
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O1OO OEO9 C,9 | 文字 列 プ リン ト ”" の シス テム ・ コ ゴール. 
O1O2 11 さ AO1 p。HSSINP ! て DE) レジ スタ に , プリ ント ・ ア ウト する 
O1OS CDOSOO OoOSH | 文字 列 の 格納 パッ フラ の アド レス を セツ 


"か ト す る こと . 
01oA CDo5oo o6osh。。 コン ソー ル 入 "の シス テム ・ コ ー ル . 


O1OD FE4D " | 陸 さ こら NMONGOUT* へ ジャ ンプ . 
O1iOF CA2401 MONBOuT (入力 が M" な ら ^MONGO ジャ ンプ 
0112 FE4E ・N' CA に 
O114 CA2FO1 ・ NIBTOUT | 入 カ が 'N な ら *NIGTOUT 和 ジャンプ. 


O117 FE1A 1AH ョ ーー2 | 入力 が Gtrl -Z な ら ネ ブロ グラム を 終了 し て 
O119 CB CPM へ 戻る . 


Oi1n OEO2 C,2 入力 が 上 記 の いずれ で も な い 場 合 ,* や "を 
O11C 1ESF 放 。" マ "| 出力 する . “コン ソー ル 出 力 " の シス テム ・ 
O11E CDOSOO ooo5H | コー ル . 


0121 CSOOO1 ー… 繰 り 返 し . 


O124 OEO マ 
O126 11S5EO1 の シス テム ・ 当 堪 
O129 CDOSOQ 文字 便 パ ッ フ ァ ト MSGMONG* の 内 容 が 出力 され る . 
O12C C3OOO1 | 

NIBTDUT 
O12F OEO9 MVI 
0O1 さ 1 1185O1 し Xi し 
0134 CDOSOO CALL O0OSH | パッ ファ "MSGNIGT" の 内 容 が 出力 され る . 
01 さ 7 CSOOO1 JMP 
01 さ A ODOR696E7O MSGINP DB 
O1SE ODOAOA474F MSGMONG』 DB 
O185 ODOAOA474F MSGNIGT』 DB 


oO1AA END 


文 


ODH。OAH。 ORH。" SBDOD MORNINB! THIS IS FUNCTION 9." 。ODH。OAH。" $" う 
ODH, OAH。 OAH。" BDOD NIGHT! THIS 1S FUNCTION 9." 。ODH。』OAH。" の 
* 文 字 列 プリ ント ” の シス テム ・ コ ー ル に より の ., それ ぞ れ の 文字 烈 パ バッ ファ ト 


の 内 容 が "$” が 来る まで コン ソー ル に 出力 され る . 0DH は 御 帰 , 0AH ラ 
は 改行 の コー ド で ある . 


Figure-2.2.15 ファ ンク ショ ン :9 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


ODH。OAH。" は nput NM)orning or Night ーーーv** 


この ソー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , “9. COM” を 生成 し て ,。 プロ グラ 
ム を 実行 し て み ま し ょ う . 


ファ ンク ショ ン : 9 実習 プロ グラ ム の 実行 


実行 例 を 次 に 示し ます . 適当 に , M や N, その 他 の 文字 な ど を キー イン し て 試し て みて 下さ い . 最 
後 は Ctrl-Z で CPM に 戻る こと が で きま す . 


A>9 ) -…- 実 習 プ ログ ラム の 実行. 

#nput NM)orning or N)ight  --->M …M" を キー イン . 
BDDD MORNINB! THIS IS FUNCTIUN 9。 プロ グラム の 論告 . 
input MM)orning 。 or  N)ight ーー 一 >N 
GODOD NIBHT! THIS IS FUNETION 9. 
input NM)orning or N)ight ーーー>X?- ーー x "を キー イン .* ゃ ^ が 表示 され だ . 


nput  M)orning or N)ight ーー-> へ Z-ーー Ctrl-Z の キー イン に より . 本 ブロ グラ ム を . 
人 > ご 終了 し て CPZM に 戻る . 


ーー"N^ を キー イン : 


Figure-2.2.16 ファ ンク ショ ン : 9 実習 プロ グラ ム の 実行 . 
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主 シ ステ ム ・ コ ー ル 徹底 解説 


CALL 手 順 
MVI C, 10…… (=0AH) 
(D, E) ー バ ッ フ ァ ・ ア ドレ ス 
CALL 0005H 
軸 
(入力 され た 文字 列 が .。 コン ソー ル ・ バ ッ フ ァ に 格納 され て いる ) 


機能 

コン ソー ル か ら の 入力 を , (D,E) レジ スタ に よっ て アド レス され る コン ソー ル ・ バ ッ フ ァ の 先頭 番地 十 
2 番地 か ら , 順次 格納 し て 行く . 
バッ ファ の 入力 可能 最大 文字 数 は 255 文 字 で あり , 入力 に 際 し て , RUB〆DEL, Ctrl-C, Ctrl-E, Ctrl 
-H, Ctrl-], Ctrl-M, Ctrl-R, Ctrl-X な どの 各種 ライ ン ・ エ ディ ッ テ ィ ング 機能 が 働く . 
CALL か ら 戻 る 条件 は ,、 キャ リッ ジ ・ リ タン が 入力 され た 時 、 あるいは “mx” で 任意 に 設定 され る 入 
力 許可 文字 数 (上 限 は 255 文 字 ) と , 実際 に 入力 され た 文字 数 が 一 致し た と き で ある 。. 

コン ソー ル ・ バ バッファ の フォ ー マ ッ ト を 次 に 示す . 


ン E) レ ジス タ で アド レス され る コン ソー ル ・ バ ッ フ ァ の 先頭 番地 . 最大 25 文 字 まで 可能 


mx… こ こ に , 入力 許可 最大 文字 数 ( | 一 255 の 間 で 任意 ) を , あら か じ め セ ッ ト し て お く . 
nc…CALL か ら 戻 っ た 時 に , 実際 に 入力 され た 文字 数 が セッ ト され る . 
Ci 一 Czss … 入 力 さ れ た 文字 が 格納 され る . 


実習 プロ グラ ム ファ ンク ショ ン :10 


ファ ンク ショ ン : 10 の 機能 を 確認 する に は , コン ソー ル ・ バ バッファ を DDT の ロー ド に よっ て , 壊さ 
れ な い ア ドレ ス 2000H 以 上 の 適当 な 位置 に 設定 し , ファ ンク ショ ン : 10 を 実行 し た 後 」 DDT で その コ 
ン ソ ー ル ・ バ ッ フ ァ を ダン プ す れ ば , 確認 する こと が で きま す . し か し , ここ で は プロ グラ ム を 作っ 
て , 前 述 の mx,。nc の 値 と , c1 以 後 の 入 力 さ れ た 文字 列 と を 表示 させ て , その 働き を 見 る こと に し まし 
ボ プ 。 


に 1<) 


シス テム ・ コ ー ル 徹底 実習 


コン ソー ル ・ バ ッ フ ァ を アド レス 5000H に 設定 し , 入力 許可 文字 数 は 40 字 に 制限 し て お く . 

プロ グラ ム を 実行 する と , まず , 入力 を 促す プロ ンプ ト `*” が 出力 され , 続け て 適当 に 文字 

列 を キー 入力 し て 行く て. キャ リッ ジ ・ リ タン て 入力 を 終了 する と , コンソール ・ バ ッ フ ァ の 内 容 が , 
mx Lnc こ Cc1」 Cc2…… (実際 に 入力 され た 文字 列 ) 

と 表示 され , 再び プロ ンプ ト に 戻る . 

プロ グラ ム の 終了 は , 当 フ ァ ン クシ ョ ン の Ctrl-C 入 力 を 利用 し , リプ ブート し て 終わ る . 


この よう な プロ グラ ム を 作っ て み ま し ょ う 。 
この 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


AA>TYPE 1O.PRN 


oioo 
SOoO = 
oloo sg28 MVi A, 4O | 入力 パッ ファ の TOP に 値 40(=28H) を スト ア 。 
olo STA BUFF ッ フ ァ 5 

2 さ 2005O 「 入力 バッ ファ を 最大 40 文 字 に 制限 する (255 字 まで 可能 ). 

START 
oO1O5 CD76o1 CALL CRLFOUT- 複 帰 ・ 改 行 を 出力 . 
oloB oOEo2 Mvi 2 RY 
O10Q 1E2A MVI FE" ま に に の な の 
o1oC CDo5oo CALL ooo5h 
* コ ン ソー ル ・ パ バッ ファ へ の 腕 み 込み * の シス テム ・ 
rh xt 。 5VBuF| コ ニル . パッ ファ へ の 入力 モー ド と な り . ライ ン - 
ま \ 和 その 他 リッ ゴ 一 ル ・ 

Oi14 CDo5oo CALL 。 ooo5H | うる ガ 欄 能 す る 
o117 CD7&01 CALL 。 CRLFDUT]a 還 aw 
011Q CD7601 CALL CRPounl 寺 和 La 
ol1D saoo5o EDA BFF 、] 人 AZ/ パ ウフ ァ の 1 上 ( 季 O を 
O12O CDS7o1 CALL HEXDSPLY | 16 進 表示 . 
O12< <E2O MVr IN の 
O125 CD6FO1 CALL 。 CGNour」 ス ペース を 
O128 さ Ao15o DA BUFP+1 」 入力 パッ ファ の 2 入力 を れ だ 文 チ 
O12B CD57O1 CALL HEXDSPLY| を 16 進 表示 . 
O12E SE2O MV1 FID に 
O13O CD6Fo1 CALL CNour! ス ペース を HH か 


6 フ 


O13 ミ 21025O LXr H, BUFF+2 
0136 さ ao1SO LDA BUFF+1 
O139 FEOO CPI oo 
0O13B CA4EO1 JZ J1 
O13E 47 Mov B。A 
DSPLY』 入力 され だ 内 容 を , 入力 され だ 文字 数 分 
O13F CSES PUSH B! PUBH H で BUFF+ 1 」 の 値 ) 表 示す る . 
O141 OEo2 MVI C。2 よ つ っ て 生体 の 表示 は 。 
(入力 バッ ファ 最大 文字 数 )_ (入力 され だ 文字 数 ) 
O14 さ SE HQV EN _-( 入 力 さ れ だ 内 容 ) と な る . 
o144 CDo5oo CALL ooosH 
O147 E1C1 POP H! PnP B 
0149 2 さ INX H 
O14A O5 DCR B 
O14B C2SFO1 JNZ DaPLY 
O14E CD7Z6O1 1s CALL 。 CRLFQUuT 
O151 CD76O1 CALL CRLFOUT 3 本 が っ たら, 昌和 か 
O154 CSO5O1 JMP START 
HEXDSPLY 
O157 F5 PUSH PSw 
0O15B OFOFOFOF RRC! RRC! RRC! RRC 
O1SC CD6oO1 EALL 。 HUT1 
O15F F1 PP PSM 
O16O E6OF HOUT1: ANr OFH き 9 あさ 
NT て 事 っ Pe に つ ャ (レジ スタ の 値 を 16 進 で 表示 する サブ ルー チン . 
O164 FE さ A CPI さ AH 
O166 DA6BO1 JC HOUT2 
O169 C60 フ 7 ADI 2 
O16B CD6FO1 HOUT2』 CALL CONQUT 
OieE C9 RET 


MVi 

NOV _ |AQ レ ジス タ の キャ ラク タ を コン ソー ル に 出力 
CALL する サブ ルー チン . 

RET 


CRLFOUT 
MVI A。 ODH 
CALL CONOuT 


復帰 ・ 改 行 を コン ソー ル に 出力 する 
WVX AOAH 「 サ プ ル ー チ ン . 


CALL CONOUT 
RET 


END 


Figure-2.2.17 ファ ンク ショ ン :10 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


この ソー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , “10 . COM” を 生成 し て プロ グラ ム 
を 実行 し て み ま し ょ う . 
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シス テム ・ コ ー ル 徹 克 実 習 


ファ ンク ショ ン : 10 実習 プロ グラ ム の 実行 


実行 例 を 次 に 示し ます . 自由 に , 文字 列 を 入力 し た り , ライ ン ・ エ ディ ッ テ ィ ング な どの コン トロ 
ー ル ・ キ ャ ラク タ を 入力 し た り し て 実験 し て み ま す . 


を キー イン . 
28 O7 ABCDEFG = 入力 され だ 内 容 . 
次 力 さ れ だ 文字 数 . 7 文字 入力 され だ ご と を 示し て いる . 
入力 パッ ファ 許可 文字 数 . 28H=40 字 (最大 255 字 可能 ). 
#*O12 く 4567B9VMXYZ / を キー イン . 


28 OF O12 さ 456789VMXYZ = 入力 され だ 内 容 . 
15 文 字 入力 され だ こと を 示し て いる . 


^ へ R を キー イン (リタ イプ させ る ).*#" は CPM の 論客 . 
*abcdefggfed# 


一 ーー 4 回 RUBOUT を キー イン (4 文字 削除 . 工 コー-/ パ ぃ 
へ へ R に よる 表示 . ッ ツク さ れ て いる ). 
2B OS abc-- 入力 され だ 内 容 . 
や 、 
結局 文字 入 字 さ れ だ . 


*OUPQRSTU 要 
テ 4 へり を キー イン .*#/ は CP ン M の 応答 . 


28 
和み べ で WW あれ て 。 何 も 入力 され て いな い . 


) を キー イン し て いな いこ と に 注目 . 


に 
*12 さ 4567B9O 1 2 さ 4567B9O1 2 さ 456790 1 2 さ 456789O 任意 の 文字 を 40 字 キー イン . 入力 が 

設定 最大 文字 数 に 達する と , 自動 的 
28 2B 12 さ 4567B9O12 さ 456789012 さ 4567B9012 さ 4567B90 に 入力 を 終了 する . 


28H=40. バッ ファ が ガ フ ル に な つて いる こと が 分 か る . 
1 文字 目 に キー イン する と , Ctrl-C も 有効 で ある (2 文字 目 以後 は 無効 ). 


リプ ー ト し て CP ン M に 戻 つ だ . 


Figure-2.2.18 "ファ ンク ショ ン :10 実習 アロ グラ ム の 実行 例 . 


な お , この プロ グラ ム は , コン ソー ル ・ バ ッ フ ァ を 5000H に 設定 し て あり ます の で , Ctrl-C で リプ ブー 
ト し た 後 (1 文字 目 に 入力 し な いと Ctrl-C は 有効 で な い ), DDT を 起動 し , 5000H か ら ダ ンプ し て コン 
ソー ル ・ バ ッ プ ファ を 直接 確認 する の も 良い で し ょ う . 

この , ファ ンク ショ ン : 10 は ,、 ライ ン ・ エ ディ ッ テ ィ ング 機能 や , 各種 コン トロ ー ル ・ キ ー に よる 
制御 が 有効 な の で , 応用 プロ グラ ム 上 て 文字 列 の 入力 に 用 いる と 大 変 便利 で す . 
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全 シ ステ ハム ・ コ ー ル 徹底 解説 


CALL 手 順 
MVI 1 (=0BH) 
CALL 0005H 


筐 
(結果 は A レ ジス タ に 格納 され て いる ) 
機能 


コン ソー ル に 入力 が あっ た か どう か の チェ ッ ク を 行い , 入力 が あっ た 場合 は A レ ジス タ に FFH を 持っ 
て CALL か ら 戻 る . 入力 が な か っ た 場合 は 00 を 持っ て 戻る . 


実習 プロ グラ ム ファ ンク ショ ン : 11 


コン ソー ル に , “一 "記号 を 連続 し て 出力 させ な が ら コ ン ソ ー ル 入力 の チェ ッ ク を 行い , 入力 が 
あれ ば , その 文字 を コン ソー ル に 出力 し て “一” 記号 を 出力 し 続け る . 

入力 が ^“S” の 場合 は , 次 に 何ら か の キャ ラク タ が 入力 され る まで 一 ” 記号 の 出力 を スト ッ プ 
する . 入力 が Ctrl-Z の 場合 は , プロ グラ ム を 終了 し て CPM に 戻る . 


この よう な プロ グラ ム を 作っ て み ま し ょ う 。 
この 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


A>TYPE 11.PRN』 


Q1oO 


1 ee =、 2 。 |* コ ン ソ ー ル 出力 * の シス テム ・ コ ー ル . 
を *ー 記 号 を コン ソー ル に 出力 する . 
Oio4 CDoSoo ooo5hH 


フロ 0 


シス テム ハム ・ コ ー ル 徹底 実習 


コー ニル 入力 ガ あっ だ 場合 は FFH。 な い 電 88300 は YAM 
O109 CDOSQOO CALL ooosH ! ガ , レ ジス マタ に 得 ら れる . RT 
O1OC BZ QRA Aa | 入力 が な い 場 合 は , 最初 の *START? へ ジャ ンプ 
Oo1OD CAooo1 JZ START ! し て ルー プ す る . 

コンソール 入力 "の シス テム ・ コ ー ル . 
0O11O OEO1 MVI C。1 | 上 記 ル ー プ で 入力 が あれ ば , レジ スタ に 入力 
O112 CDOSoO CALL OOOSH oo 
0O115 FE1A CPI 1AH 』=^Z | 入力 が Ctrl-Z な ら 本 プロ グラ ム を 終了 し て 
O117 CB RZ ! CPZM に 戻る . 
O11B FESS CP *5* | 入力 が ^S" 以 外 の 場合 は .^START* に ジャ ンプ II 
O11A C2OOO1 JNZ START | レヒ て ルー プ す る . RI 
Q11D OEO1 MV1 C。1 | 入力 が "S/ の 場合 , この "コン ソー ル 入 力 "の 
O11F CDOSoo CALL QooQ5H ! シス テム ・ コ ー ル に より , 入力 待ち と な る . 
O122 C さ OOO1 JMP START “コン ソー ル 入 力 が あれ ば ぱ ば , "START* に 戻り 

ルー プ す る 、 

O125 END 


Figure-2.2.19 ファ ンク ショ ン :11 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト 
この ソー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り , “11 . COM” を 生成 し て 。 プロ グラ 
ム を 実行 し て み ま し ょ う . 
ファ ンク ショ ン : 11 実習 プロ グラ ム の 実行 


実行 例 を 次 に 示し ます . 


タプ を キー イン (タブ は Ctrl 一 ! で 代用 で きる ). 


dh て ? フ FAo メ ペー ス 2 
B 


ー ニ ーーーーーーーーーーーーーーー ご ーーーーーーーーーーーーーーーーーーーーーーーー 


4 

Ctrl-Z を キー イン する と 。 オフ ログ ラム を そし 
*S* を キー イン する と . 当 プロ グラ ム に より , キー 入力 待ち と な り  OP ン MC 戻る . 交 め 3 
*ー” の 出力 ガ が スト ッ プ ずる. SU 
次 に 何ら か の 文字 を 入力 する と * -* の 出力 が 再開 され る . 2 0 N 


Figure-2.2.20 ファンクション:11 実習 プロ グラ ム の 実行 . 


フ 1 


至 シス テム ・ コ ー ル 徹底 解説 


プロ グラ ム で 使わ れ て いる コン ソー ル 出 力 は , ファン クシ ョ ン : 2 を 使っ て いる の で , Ctrl-S に よる 
フリ ー ズ , Ctrl-P に よる プリ ンタ へ の 同時 出力 が 有効 で す の で 試し て 下さ い . *S” に よる パー? 表示 
の スト ッ プ は , 当 プ ログ ラム に よる も の で す . 

この ファ ンク ショ ン : 11 は , 何ら か の プロ グラ ム を 実行 きせ な が ら , キーボード か ら 入 力 が ある か 
どう か を セン ス し て , その 入力 キャ ラク タ に より , それ ぞ れ の 仕事 に 分 岐 きせ る , と いう よう な プロ 
グラ ム に 応用 で きま す . 


CALL 手 順 
MVI の 2 ce (=0CH) 
CALL 0005H 


申 

(結果 は H レ ジス タ お よび し レジ スタ に 格納 され て いる ) 
機能 
現在 起動 し て いる オペ レー ティ ング ・ シ ステ ム が , CPM で ある か , MP プ M で ある か の 判別 を 行い , 
CPM で あれ ば , その バー ジョ ン No. を 知ら せる 。. 
CALL か ら 戻 っ た だ 時, HH レジ スタ が 00 な ら ば CPM, 01 な ら ば MPM で ある こと を 示す . 
バー ジョ ン No. は , し エレ ジス タテ = テ 00 で あれ ば version2.0 以 前 の も の を 示し , 2.0 以 上 の バー ジョ ン の 場 
合 は , し =20H で あれ ば version2.0, 22H で あれ ば version2.2 と いう 具合 に , 20H-2FH ま で の 値 で 示 
され る . 


実習 プロ グラ ム ファ ンク ショ ン : 12 


現在 起動 し て いる オペ レー ティ ング ・ シ ステ ム が , CPM で ある か , MP プ M で ある か , CP/ 
M な ら ば その バー ジョ ン No. は 何 か , を 表示 させ る . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


アジ 


シス テム ・ コ ー ル 徹底 実習 


O10O OEOC 
O102 CDOSoo 


Q105 7C 
0O106 FEOO 
O1OB CA1CO1 
O1OB FEO1 
O1OD CA16O1 


0110 117FO1 
011 さ CSSOO1 


STARTs 


MPNM』 


CPM 


VER1Xs 


VER2Os 


VER22』 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 


Cu12 | バー ジョ > RNN 
ooo5H」 バー ジョ ン No. の 取り 出し "の シス テム ・ コ ー ル . 


AH | レジ スタ の 結果 が 00 の 場合 は CP ン M. 


^CP/M* へ ジャ ンプ . 
CPN 


O1 | (0 レジ スタ の 結果 が 01 asu as M. 
MPN MP ン ノ M? へ ジャ ンプ 


D。 >149BANTR ご ちら で も な い 場 合 は ,. 他 の シス テム な の で , 
MSGOUT 「SYSTEM=ANOTHER」 と 表示 へ . 


D, MSGMPN 


FE (「SYSTEM=MP ン M」 と 表示 へ . 


昌 sao | 「SYSTEM=OP ン M Verslon」 と 表示 へ . 
MSBDUT (レジ スタ に は バー ジョ ン No. を 持つ てい る 


の で 保護 し て いる . 

09 | ロレ ジス タ ガ 00 の 引合 は .*VER1X" へ ジャ ンズ. 

VERix | パー ジョ ン 2.0 以 前 . 

2CH | (0 レジ スタ が 20 の 場合 は VER20" へ ジャ ンプ 

VER2O バー ジョ ン 2.0. 

22H | (レジ スタ ガ 22 の 楊 合 は , VER22X ヘ ジャ ンプ . 

VER22 | パー ジョ ン 2.2 

VER22UP -…( リ レジ スタ ガ 22 以 上 の 場合 は すべ て , 
*VER22up? ヘ ジャンプ. 


D,MSB1X | r。 ん 落 
BBOUT [ 1.X ょ と 表示 へ . 


Per ] 「2.0」 と 表示 へ . 


D。 MSG22 ee 
DB922 | r2.2, と 表示 へ . 


D, MSG22UF 


nr 08B220P ) r2.2 up。 と 表示 へ 


* 文 字 列 の ブリ ント * の シス テム - コ ー ル の サブ 900 人 
ルーン し CD) レ ジス タ に 玉生 の アド レス 
を セッ ツ ト し て CALL す る 


C。9 
OOOSH 


フ 3 


至 シ ステ ム ・ コ ー ル 徹底 解説 


O156 ODOA5 さ 595 さ MSGMPM: DB ODH, OAH。 " BYSTEN = MP/M* 。ODH,。OAH。” 

O16B 5 さく 595 さ 5445 MSGCPM: DB * SYSTEM = CP/M version *” 

O17F 53545 さ 5445 MSGANTR+ DB * STSTEM = ANDTHER* 。 ODH。 OnH。" *” 

O192 さ 12E7BODOA MSB1X』 DB >1。x" 。ODH。 OAH。" 文 列 エリ ア . 
O198 さ 22E さ OODOA MSG20』 DB 2。O7 。ODH。 OnH。" を * 

O19E さ 22E さ 2ODOA MSB22』 DB 2。27 。ODH。OAH。" 

O1Q4 さ 22E さ 22055 MSG22UP 』 DB 2.2 UP" 。ODH。 ORH。" ** 


END 


Figure-2.2.21 ファ ンク ショ ン :12 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 
上 記 ソ ー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り アセ ンプ ブル し , “12 . COM” を 生成 し 
て 宙 条 し で み ま し ょ う 。 
ファ ンク ショ ン : 12 実 習 プ ログ ラム の 実行 


CPM の 各種 バー ジョ ン (一 般 的 に は , version 1.4/2.0/2.2) を お 持ち の 方 は それ ぞ れ の バー 
ジョ ン に つい て 実験 する と 良い で し ょ う . 

まず , それ ぞ れ の バー ジョ ン の シス テム を 起動 し た 上 で , 実習 プロ グラ ム を 実行 し ます . シス テム 
が MP〆M の 場合 は , 


SYSTEM = MP〆M 


と 表示 し ます が , CP/M の 場合 は , Figure-2.2.23 の 実行 例 の よう に バー ジョ ン No. も 共に 表示 され ます . 


4BK CP/NM ver 2.2 CPM 起動 時 の オー プ ニ ン グ ・ メ ッ セ ー ジ . 


人 A>12 ) 実習 プロ ブラム の 実行 . 


SYSTEM = CP/NM version 2.2 
人 > 注目 . バー ジョ ン No. が ガレ ポー ト さ れ て いる . 


Figure-2.2.22 ファ ンク ショ ン :12 実習 プロ グラ ム の 実行 . シス テム が CPM version2.2 の 場合 . 


48K CP/NM ver 1.4 CPM 起動 時 の オー プ ニ ン グ ・ メ ッ セ ー ジ . 
A>12 7 ---- 実 習 プ ログ ラム の 実行. 


SYSTEM = CPZ/N version 1.x 』 ' 
人 > 1 _ 中 プロ グラ ム に より , 2.0 以 前 は 1.X と し て レポ ー ト され て いる . 


Figure-2.2.23 ファ ンク ショ ン :12 実習 プロ グラ ム の 実行 、 シ ステ ム が CPM version1.4 の 場合 . 


フ 4 


シス テム ・ コ ー ル 徹底 実習 
この ファ ンク ショ ン : 12 は , 例え ば , MP プ M で な けれ ば 実行 で き な い アプ リケーション ・ プ ログ ラ 


ム と か , CPM の バー ジョ ン 2.0 以 上 で な けれ ば 実行 で き な い プロ グラ ム な ど に 応用 し て , 現在 働い て 
いる シス テム が , 適合 する か どう か の 判別 を 行わ せる 場合 に 使用 し ます . 


有 逐 光 ョ ン ao 


ファ ンク ショ ン : 13… デ ィ ス ク ・ シ ステ ム の リセ ッ ト 


CALL 手 順 
0 C」 13 …… (=0DH) | 
CALL 0005H 

機能 


すべ て の ディ スク ・ シ ステ ム を イニ シャ ル 状 態 に セッ ト す る . つま り , すべ て の ドラ イブ は “RW? 
と な り , DMA ア ドレ ス (後述 ) は 0080H の デフ ォ ー ル ト 値 に セッ ト さ れ , ドラ イブ A : が 選択 され る . 
た だ し , ログ イン ・ デ ィ ス ク は 変化 し な い の で , ファ ンク ショ ン : 13 を 実行 し た 時 点 の ログ イン ・ デ 
ィ ス ク が A : 以外 の 場合 は いっ た ん ドラ イブ A : が 選択 され た 後 , 元 の ドラ イプ に ログ イン され る . 


実習 プロ グラ ム ファ ンク ショ ン : 13 


ファ ンク ショ ン : 13 で , ディ スク ・ シ ステ ム を リセ ッ ト す る プロ グラ ム を 作成 する . 
プロ グラ ム が 実行 され た 時 , ディ スク ・ シ ステ ム が リセ ッ ト さ れ た こと を 知ら せる メッ セー ジ 
を 出力 させ る . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


| ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー# 


すま FUNCTION 1 さ 』 RESET DISK SYSTEN 1 
』 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ニ ーーー ーー# 
otoo DRG 10OH 
STARTs 
O1oO OEOD MVI 2 半生 he の JP の 
O1O2 CDO5oo CALL Ooo5H | シス テム ・ コ ー ル 
O1O5 OEO9 MVr 9 - 駐 区 プ リン ト " の シス テム コー ル . 
O1O7 11OEO1 D,MSGRST JMB ? の 文字 列 ガ プリ ント 
O1OA CDo5oo CALL ooo5H れる . 


フ 5 


至 シ ステ ム ・ コ ー ル 徹底 解説 


oloD C9 RET 
O1OE QDOA44495 さ MSGRST』 DB ODH。OAH。*DISK SYSTEN MAS RESET*。ODH,OAH』' 
ol28 END 
A> 


Figure-2.2.24 ファンクション:13 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ブル し , “13 . COM” を 生成 
し て 実行 し て み ま し ょ う . 


ファ ンク ショ ン : 13 実習 プロ グラ ム の 実行 


一 度 ロ グイ ン さ れ た り , 何ら か の アク セス が 行わ れ た ディ スク ・ ド ライ ブ の ディ スケ ッ ト を 交換 し 
た 場合 ,. CPM は 自動 的 に 異な っ た ディ スケ ッ ト で ある こと を 判別 し , その ドラ イブ を 書き 込み 禁止 
(R/O) に し て , ディ スク の デー タ が 破壊 され る の を 防ぎ ます . 

通常 この よう な 場合 は 、 Ctrl-C に よる リブ ー ト を 行っ て , シス テム 全体 の リセ ッ ト を 行っ て か ら , 
書き 込み を 伴う プロ グラ ム を 運用 する の で す が , この ファ ンク ショ ン : 13 を 使え ば , リプ ー ト を 行う 
こと な く 〈《, ディ スク ・ シ ステ ム の リセ ッ ト を 行う こと が で きま す . 

その 実験 を 行っ て み ま し ょ う . ドラ イブ B : の ディ スケ ッ ト を 変換 し て , R プ O と な っ た こと を 確認 
し た 後 。 ファ ンク ショ ン : 13 を 実行 し て み ま す . その 様子 を 次 に 示し ます . 


- (ドラ イブ A : 上 に "13. COM" と *\STAT.COM“ が ある .) 

>Bs/ ドラ イブ B : に ログ イン CB : に は 適当 な アディ スケ ツ ト を セツ ト し て お ぐ ). 

B>asSTAT STAT コ マン ド 実行 . 

As R/M。 Spacei 197k | ニー 

Bs R/M。 Bpacwi 14k |B: に も ロブ イン し て いる の で , A : B : 共に 表示 され る . RW 表示 に 注目 . 
(ここ で , ドラ イブ B : の ア ィ スケ ッ ト を , 適当 な 別 の ディ スケ ッ ト と 入れ 替え る . ) 


PER_PAP。EO 入れ 替え だ ディ スケ ッ ト の ディ レフ ト き 半 み 込ま せる だ め ビ 。 例え ば DIR コ マン ド を 実行 する . 
日 


B>ASTAT/ -- 再 度 STAT コ マン ド を 実行 . 
As R/M。 SBpacei 197k | B: の R ン W ガ R ロ ン O と な つて いる ご と に 注目 
Bs R/0。 Spacei 14k | 中 り バ イト 数 が 異な る ティ スケ ッ ト で ある の に 以前 の まま (14 k う で ある こと に も 注 


B>ai 1 さ / 実習 プロ グラ ム の 実行 . 


DISK SYBTEM MAS RESET 実習 プロ プラ ム に よる メッ セージ. ファ ン フ ション : 13 が 実行 され だ . 


再度 STAT コ マン ド を 実行 . 


人 As R/MW。 Spacgs 197k | B: の ロン O ガ R ロ ン W に リセ ッ ト さ れ , 入れ 替え だ ディ スケ ッ ト の 残り バイ ト 数 も 
Bs R/M。 Bpacew』 57k | 正 し ぐ 表示 され て いる . 


B> 


Figure-2.2.25 ファ ンク ショ ン :13 実習 プロ グラ ム の 実行 . 


フ 6 


シス テム ・ コ ー ル 徹底 実習 


ファ ンク ショ ン : 14… デ ィ ス ク ・ ド ライ プ ブ の 選択 


CALL 手 順 
MVI C, 14…… ( 三 0EH) 
(E) ーー ドラ イブ No. (0=A:, 1=B:。 2=C:……) 
CALL 0005H 

機能 


この ファ ンク ショ ン : 14 が 実行 され た 後 の 各 種 フ ァイル 操作 は , セレ ジス タ の 値 に よっ て 指定 され た 
(ドラ イブ A : =00, B : =01, C: =02,。…… ) ドライブ 上 で 行 ね れる 、 つ まり , ファ ンク ジョ テ ・】4 
に よっ て 選択 され た ドラ イブ が , デフ ォ ー ル ト ・ ド ライ プ ブ と な る . 新しく 選択 され た ドラ イブ は , 当 
ファ ンク ショ ン に より 再選 択 が 行わ れる か , リプ ー ト され る まで は 変化 し な い . 

た だ し , ファ イル 操作 が 行わ れる ファ イル の FCB (ファ イル ・ コ ント ロー ル ・ プ ロック) の 最初 の バ 
イト (ディ スク ・ ド ライ プ ・ コ ー ド ) が 00?” 以外 の 場合 は ,、 その 値 に よる 直接 ドラ イブ 選択 の 方 が 
優先 し 。 ファ ンク ショ ン : 14 に よる 選択 は 無視 され る . 


ファ ンク ショ ン : 17… 最 初 の ファ イル ・ デ ィ レ クト リ の サー チ 


CALL 手 順 
MVI 7 er (=11H) 
(D, E) FCB ア ドレ ス 
CALL 0005H 


韻 
(結果 は A レ ジス タ に 格納 され て いる ディ レク ト ・ コ ー ド , お よび DMA バ ッ フ ァ に 格納 さ 
れ て いる ディ レク トリ 内 容 で 示さ れる ) 

機能 

(D, E) レジ スタ に セッ ト さ れ た FCB で 示さ れる ファ イル を ディ レク トリ か ら 捜 し 出し , 見 つか っ た 場 
合 は , 該当 ファ イル が 含ま れる ディ レク トリ ・ エ ント リ の 128 バ イト を DMA バ ッ フ ァ に 格納 する . そ 
の 場合 。A レ ジス タ に は , 0, 1, 2, 3 の いずれ か の 値 の ディ レク トリ ・ コ ー ド が セッ ト さ れ て お 
り , その 値 を 32 倍 (RLC を 5 回 行う ) する と , DMA バ ッ フ ァ 内 の 該当 ファ イル の ディ レク トリ 部 の 先 
頭 ア ドレ ス を 知る こと が で きる (DMA ア ドレ ス の 先頭 番地 十 人 レジ スタ の 値 X32 ニ 該当 ファ イル の デ 
ィ レ クト リ 先 頭 番地 ). 


アグ 


全 シ ステ ハム ・ コ ー ル 徹底 解説 


も し , FCB で 示さ れる ファ イル が 見 つか ら な か っ た 場合 は , A レ ジス タ に 255(FFH) が セッ ト さ れ て 
CALL か ら 戻 る . 


CALL 手 順 
MVI C, 26 … (1AH) 
(D, E) -DMA ア ドレ ス 
CALL 0005H 


機能 

DMA (Direct Memory Address) は ,. ディ スク の すべ て の リー ドラ イト 操作 を 行う 場合 に 必要 な 
1 レコ ー ド (128 バ イト ) の 入出 力 バ ッ フ ァ ・ エ リア の こと で あり , デフ ォ ー ル ト は アド レス 0080H に 
設定 され て いる . ディ スク へ の , どの よう な リー ドブ プラ イト も , 必ず この DMA バ ッ フ ァ を 通し て 行わ 
れる . 

ファ ンク ショ ン : 26 に より , 任意 の アド レス に DMA バ ッ フ ァ を 設定 する こと が で き , 設定 され た アド 
レス は , 当 フ ァ ン クシ ョ ン が 再度 実行 され る か , リブート され る まで は 変化 し な い . 


実習 プロ グラ ム ファ ンク ショ ン : 14,17, 25 


ファ ンク ショ ン : 14, 17, 26 を 使っ て ,DIR コ マン ド の 特定 ファ イル 名 サー チ (DIR x : filename . 
ext) に 相当 する 機能 を , ユー ザー・ プ ログ ラム で 実現 す る. 

また , 見 つか っ た ディ レク トリ の DMA バ ッ フ ァ 内 の 位置 も 確認 し て みる (DMA ア ドレ ス は 4000 
H に し て お く 〈)、. 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


>TYPE 14-17ー26.PRN/ 


14: SELECT DISK 
17』 SEARCH FOR FIRST 
26』 SET DNMQA ADDRESS 


O10O 


oloo oEo9 
oO1O2 1145o1 "ha 文字 列 プリ ント * の シス テム ・ コ ー ル . 
O105 CDO5oo ooo5H ドラ イブ 名 入力 の メッ セー ジ 出 力 . 


フ 78 


/ 


シス テム ・ コ ー ル 徹底 実習 


O108 OEO1 RY Cy | コン ソー ル 入 力 * の シス テム ・ コ ー ル . 
O1OA CDOS5oo CALL 0005H | キー ボー ドガ ら ド ライ ブ 名 A, B, C, … を 入力 する . 
O1OD EeOF ANI Qooo*1111B | 、 コ に 
馬 れ 0 ーー の ( A=00.B=01,C =02, に 変 損 . 
Q110 OEOE MVI C。14 | 
O112 5F MOV E。A * デ ィ ス ク ・ ド ライ ブ の 選択 ?* の シス テム ・ コ ー ル . 
0O11 さ CDO5oO CALL OQO5H | キー 入力 さ ね だ ドラ イブ が 選択 され る . 
0116 OE1A PVI 26 | *DMA ア ドレ ス の セッ ト * の シス テム ・ コ ー ル . 
O11 110O4O LXr D, 4OOOH 「 デフォルト は 80H で ある が , DDT で の 確 属 が 可 
O11B CDo5oo CALL ooo5H | 能 な よう に 4000H に し て お ぐ . 
Q11E OE11 MVI C。1Z | * 最 初 の ア ィ レフ トリ の サー チ * の シス テム ・ コ ー ル . 
O12O 115Coo LXi D, OOS5CH 人 FCB ア ドレ ス は , デア フォー ルト の 5CH に 
0O123 CDo5oo CALL QoO5H し て お ぐ . 
0126 FEFF CPI 255 | 該当 フラ イル が な い 場 合 は .*NAINAI へ 
O12 CA さ CO1 JZ NAINAI 「 ジ ャ ンプ . 
O12B O707Q7O7O フ 7 RLC! RLC! RLC! RLC! RLC | 見 つ ひ つた ファ イル の ディ レク トリ の 位置 を 
01 さ oO さ 29O4O STA 4O9OH 「 アド レス 4090H に 格納 する (参考 まで に ). 
O1 さ さ OEOQ9 MVI C,9 
01 さ 5 118101 LXI D,MSGARI トラ ァ ィ ル ぁ っ mr の xye--M の 
013B CDOSOO CALL OOOSH 
O1 さ B C9 RET 

NAINQIs 
O1 さ C OEO9 MVI C。9 1 
O1SE 116DO1 LXi D, MSGNAI | ファ イル な "の メッ セー ラジ. 
Q141 CDOSOO CALL Qoo5H 
Q144 C9 RET 


O145 ODOA494E5O_ MSGINPk DB ODH。 OAH。”" INPUT DRIVE NAME ( Q。 B。 ビ 。.。.P ) 一 一 > や ? 
O16D ODOAOA4649 MSBNQAIk DB OoDH, OAH。OAH。" FILE NATI! NAT!" 。ODH。 ORH。" ま " 
0181 ODOAOA4649 MSBQRIk DB QDH。 OAH。OAH。" FILE ATTA! ATTA!” 。ODH。OAH。" ま " 


0197 END 


e 


Figure-2.2.26 ファンクション :14, 17, 26 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 の ソー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ブル し て , \14-17-26 . COM? 
を 生成 し て 実行 し て み ま し ょ う . 


フ 


至 シス テム ・ コ ー ル 徹底 解説 


ファ ンク ショ ン : 14,17, 26 実習 プロ グラ ム の 実行 
この プロ グラ ム は , 次 の コマ ンド 形式 で 実行 きれ ます 。 


14-17-26、 filename . ext 


*filename . ext' に は , ディ スク 上 に 存在 する か どう か を 調べ よう と する ファ イル の フル ネー ム を 
9 も 
この コマ ンド を 実行 する と , どの ドラ イプ 上 の ファ イル を サー チ の 対象 と する か を 問い 合わ せ て き 
ます の で 、。 ドライブ 名 の AB。 で C。"" 空 キ ー イ シ し ます 、 
結果 は , “あっ た ” と か “ない ” と か , メッ セー ジ に より 表示 され ます . 
実行 例 を 次 に 示し ます . これ は , ドラ イブ B : 上 に ファ イル ~PLMX . COM” が ある 場合 の も の で 
す . 


人 >14ー17ー26 PLHMX. ヒ ON / 実習 プロ プラム を 実行 し て , フタ イル "PLMX. COM" を 捜す . 
INPUT DRIVE NAME ( QA。 B。 ヒ 。.-.P ) 一 一 > 氏 ドラ イブ A : 上 に ある ガマ 
FILE NAI! NAI! 一 A : 上 に は 存在 し な か つ だ . 


A>14-1 フ ー26 PLNX.COM / 同様 に も う 1 度 実行 . 
INPUT DRIVE NAME ( QA。 B。 C。.--P ) 一 ->B ドラ イブ B : 上 に は ある か カマ 


FILE QATTA! ATTA! B : 上 に "PLMX. COM" が あつ だ . 


AA>DDT / DDT を 起動 . 
DDT VERS 2.2 
ーー 
44 49 52 20 20 20 20 CS 
OO oO QO 0O oO 
49 20 20 20 CS 
09 OoA oO 


・XDIR ・DN. ・ ・・ 


・PiP ・DM. 1 


ト / 
〇 


oo OO 
QooO 0O 
いり QO 
oO OO 
OO 
oO 


ee 
に 


888888 
88888 
88888 


oO 
OO OO ・-・ ユ ーー 
ご の よう に 該当 ファ イル が 見 つか つ だ 場合 は , 寺 導 ル が 信 ま れ ね て いる アデ イレ ク トリ 
・ エ ント リ の 128 バ イト 分 が , DMA バ パッ ファ に 格納 さ 
ご の 値 , 40H は , 還 光 5ー 肥 の 和 人 に ザー Sd 
=4040H と な り の , 該当 ファ イル *PLMX. COM* の 位置 を 指し て いる こと が 分 か る 
本 本 来 *43"= 文 字 の C で ある が , この ファ イル に RO ア トリ ビュ コー ) 
ト を 付け て ある だ め 最 上 位 bit ガ 1 に な り 438ーC3 に な つて いる . 


に 
@ 
は 
に 


Figure-2.2.27 ファ ンク ショ ン :14,17,26 実習 プロ グラ ム の 実行 と , DMA バ ッ フ ァ の DDT に よる ダン プア 
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シス テム ・ コ ー ル 徹底 実習 


も う 1 つの 実験 と し て `filename . ext' に ドラ イブ 名 を 付け , “x : filename . ext′ と し て 実行 す 
る と どう な る で し ょ よう 。 
"XX・ filename . ext" に 付け た ドラ イブ x : が 優先 し て 、 こ の 後 ド ライ ブ 名 入力 は , 何 を 入力 し て も 無 
視 さ れる こと が 確認 で きま す . 各自 試み て 下さ い . 


上 az om 


ファ ンク ショ ン : 15… フ ァイル の オー プン 


CALL 手 順 
MVI C,」 15…… (=0OFH) 
(D, E) FCB ア ドレ ス 
CALL 0005H 
后 
(オー プン が 正常 に 行わ れ た 時 A レ ジス タテ 00-03, オー プン が で き な か っ た 時 A レ 
ジス タニ 255=FFH と な る ) 
機能 
(D, E) レジ スタ で 示さ れる FCB ア ドレ ス の ファ イル 名 を , 該当 ディ スク 上 の ディ レク トリ か ら 捜 し , 
一 致す る ファ イル が あれ ば , その ディ レク トリ ・ デ ー タ (d0 一 dn フィー ルド) を メモ リ 上 の FCB に っ コ 
ピー し レ し , 今後 の リー ドブ ライト 操作 を 可能 に する . この こと を ファ イル が オー プン され た と 言い , 正 
常に オー プン され た 場合 は , A レ ジス タ に は 00 一 03 の 値 ( デ ィ レ クト リ ・ コ ー ド ) が セッ ト さ れ て お り , 
も し ファ イル が 見 つか ら ず オー プン で き な か っ た 場合 は ,A レ ジス タ に は 255= ニ FFH が セッ ト さ れる . 
FCB の ファ イル 名 に , ファ イル ・ マ ッ チ 記号 “*? お よび ~?7? を 使用 する こと も で きる .。 た だ し , 
ディ レク トリ 内 の 最初 に マッ チ し た ファ イル が オー プン され る 。. 


CALL 手 順 
MVI C, 20 … (14H) 
(D, E) FCB ア ドレ ス 


CALL 0005H 
3 
(結果 は , FCB の “cr′ フィ ー ル ド で 示さ れる レコ ー ド (128 バ イト ) が , DMA バ ッ フ ァ 
に 読み 出さ れる ) 
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至 シ ステ ハム ・ コ ー ル 徹 工 解説 


A レ ジス タ が 00 の 時 は , リー ド が 正常 に 行わ れ た 場合 . 00 で な い 時 は ,、 ファ イル が 終了 し 
た 場合 . ) 
機能 
(D,、E) レジ スタ で アド レス され る FCB が 示す , ファ イル の FCB 内 "cr" フィ ー ル ド で 示さ れる 1 レコ 
ー ド (128 バ イト ) を 読み 出し て ,、DMA バ ッ フ ァ に 格納 する . “cr” の 値 は , 自動 的 に 1 だ け イ ンク リ 
メン ト さ れ , 次 の レコ ー ド を 示す よう に 更新 され る . 現在 の ロジ カル ・ エ クス テン ト (8 インチ 標準 
ディ スケ ッ ト で は , 16K バ イト が 1 ロジ カル ・ エ クス テン ト ) の リー ド が 終了 し , まだ ファ イル が 続く 
場合 は 自動 的 に 次 の ロジ カル ・ エ クス テン ト が オー プン され , “cr” が 00 に セッ ト さ れる . 
この ファ ンク ショ ン : 20 を 実行 する に は , 事前 に FCB ア ドレ ス を 指定 し て ファ イル を オー プン し , DMA 
アド レス を セッ ト し て お か な けれ ば な ら な い (DMA ア ドレ ス を セッ ト し な い 場 合 は , デフ ォ ー ル ト の 
80H-FFH が DMA バ ッ フ ァ と な る ). さら に , ファ イル の 最初 か ら リ ー ド を 行う 場合 に は , “cr" フ ィ 
ー ル ド を 00 に セッ ト す る 必要 が ある . 
1 レコード の リー ド が 正常 に 行わ れ た 場合 、A レ ジス タ に は 00 が 格納 され て お り , エン ド ・ オ プ ・ フ 
ァイル (ファ イル 終了 ) と な っ た 場合 は , 00 以 外 の 値 が 格納 され る . これ に より , ファ イル が 終了 し 
た こと を 知る こと が で きる 。 
リー ド の み を 行う の で あれ ば , オー プン し た ファ イル は クロ ー ズ する 必要 は な く , その まま プロ グラ 
ム を 終了 し て よい . 


実習 プロ グラ ム ファ ンク ショ ン : 15, 20 


アス キー・ フ ァイル を タイ プア ウト する TYPE コ マン ド に 相当 する プロ グラ ム を 作成 する . 
FCB ア ドレ ス は デフ ォ ー ル ト の 5CH, DMA ア ドレ ス は 特に セッ ト せ ず , デフォー ルト の 80H を 使 


用 する . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


RA>TYPE 15-20.PRN / 


3 。 FUNCTIDN 15』 ロ PEN FILE 1 


きま 2O0』 READ SEQUENTIAL 日 


100H 
STARTi 


に ア 4 


シス テム ・ コ ー ル 徹底 実習 


* フ ァイル の オー プン "の ファ ンク ショ ン ・ コ ー ル . 
この 隊 で は , FCB ア ドレ ス は デフ ォ ー ル ト の 
5CH 番 地 に し て お ぐ . 


設 当 ファ イル が 存在 せ ず が , ファ イル の オー ブ 
1 ング で き ね の つ だ 二 ヽ OPNERR* ヘ ジ ヤ 
ンプ する . 


ファ イル ガオ ー プ ブン され だ の で , 次 の シー ケ 
| ンク シャル. リー ド に 備え て ,FCB の cr フィ ー ル 
ド (6CH+ 3 番地) を 0 に する . 
NXTREC* 
| シー ケン シャ ル ・ リ ー ド * の ファ ンク ショ ン 
| ・ コ ー ル . FCB ア ドレ ス は 同じ く 5CH と する . 


| ファ イル の 最終 が 来 だ か どう か の チエ ッ ツク. 
] シー ケン シャ ル ・ リ ー ド を 終了 し だ 場合 は , 
本 ブロ グラ ム を 終わ り 。 CPM に 戻る . 


… シ ー ケ ン シ ャ ル ・ リ ー OM パッ フ 
アア は, デフォー ルト の 80H 番 地 で あ 


DMA バ ッ フ アァ に 格納 され ね て いる 1 レコ ー ド 
〈128 バ イト ) ご と の ファ イル 内 容 を , 次 々 と コ 
ン ソ ー ル に 出力 する . 


128 パ イト を コン ゾー ル に 出力 し 終え だ か の チ 
エッ ク . 1 レコ ー ド 分 を コン ソー ル に 出力 レ 
終え だ ら , 次 の レコ ー ド を リー に ド する だ め , 
^NXTREC" に ジャ ンプ する . 

に さ 11O1 JMP 


OEO9 MV | 攻 当 ファ イル が 存在 し て いな いな ど で , ファ 
11 さ AO1 LXI イル が オー プン で き な か つ だ 時 は , “ファ イル 
CDo5oo CALL | が な い * の メッ セー ジ を 出力 する . 


C9 RET 
ODOAOA4649 MSBERR』 DB ODH。 QAH。OAH。" FILE GA _NAI' 。ODH。OQH。” と 


Figure-2.2.28 ファ ンク ショ ン :15, 20 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 
上 記 ソ ー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ル し , “15-20 。 COM” を 
生成 し て 実行 し て み ま し ょ う . 
ファ ンク ショ ン : 15, 20 実 習 プ ログ ラム の 実行 
この プロ グラ ム を 実行 する た め の コ マン ド 形 式 は , 
15-20x : filename . ext 
で あり , TYPE コ マン ド と 同様 で す . 


に で) 


至 シス テム ・ コ ー ル 徹底 解説 


次 に , 自分 自身 の ソー ス ・ フ ァイル “15-20 . ASM” を タイ プア ウト する 実行 例 を 示し ます . 


A>15ー-2O 15-20。 ASM / ログ イン ・ デ ィ ス ク 上 の 自分 自身 の ソー ス ・ フ ァイル "15-20.ASM" を 
タイ プア ウト する . 


ao 日 
ま FUNCTI ロ N 15』 UPEN FILE 『 
8 20』 READ SEQUENTIAL 『 
ーー 『 
10OH 

STARTi 

MVi C, 15 

LXI D, OOSCH 

CALL OOO5H 

CP 1 255 

JZ UPNERR 

イプ の PF で アス キー・ フ ァイル が 
モミ タイ プア ウト され て い 

JNZ SCROUT 

JMP NXTREC 
UPNERR 

MV ェ C。9 

LXI D。 MSGERR 

CALL OQOSH 

RET 


MSGERR』 DB ODH, ONAH。OAH。" FILE BA NQI' 。ODH。 QAH。" *" 


仙 > 


Figure-2.2.29 ファ ンク ショ ン :15, 20 実習 プロ グラ ム の 実行 例 . 


QA>15ー2O_B』 15ー2O。 ASN ) ビラ イブ B : 上 の ファ イル "15-20.ASM" を タイ プア ウト する . 


FILE BA NAr - 太 当 フラ イル は ドラ イブ B : 上 に は な か つ だ . 


仙 > 


Figure-2.2.30 指定 し た ファ イル が 存在 し て いな か っ た 場合 . 


タイ プア ウト し よう と する ファ イル の 頭 に , 任意 の ドラ イブ 名 を 指定 する こと が で きま す の で , 試 
みて 下さ い . 
注 ) タイ プア ウト され た ファ イル の 最後 に 。 スク リー ン が クリ ア さ れ て し まう こと な ど が あり ます 
が , これ は , 当 プ ログ ラム の 人 科 素 化 の た め に , ファ イル の 最終 の デー タ ~ 1 AH” を 検出 せ ず に , 
これ 以降 も 最終 レコ ー ド の 128 バ イト を 全部 スク リー ン に 出力 し て し まう た めで す . 
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シス テム ・ コ ー ル 徹底 実習 


| ファ ンク ショ ン : 16… フ ァイル の クロ ー ズ 


CALL 手 順 


MVI C, 16… ( 三 10H) 
(D, E) FCB ア ドレ ス 
CALL 0005H 


3 
(ファ イル の クロ ー ズ が 正常 に 行わ れ た 場合 ,A レ ジス タニ 0, 1, 2, 3 の いずれ か で 
ある .。 クロ ー ズ し よう と する ファ イル が な い 場 合 は 。 A レ ジス タニ テー255= ニ FFH と な る ) 


機能 

ファ イル の オー プン (ファ ンク ショ ン : 15)、 ある い は ファ イル の 作成 (ファ ンク ショ ン : 22) の ファ 
ンク ショ ン が すでに 実行 され て お り , FCB で 示さ れる ファ イル に 何ら か の 書き 込み が 行わ れ た 場合 , 
デー タ は , その つど , 1 レコ ー ド ずつ ディ スク に 書き 込ま れ て 行く が 、。 ディ スク 上 の ディ レク トリ 部 
に 関し て は , 何 も 更 新 さ れ て いな い . そこ で 書き 込み 操作 を 全部 終了 し た 最後 の 時 点 で 。 クロ ー ズ ・ 
ファ ンク ショ ン を 実行 し , 現在 の メモ リ 上 の FCB の 内 容 を ディ スク 上 の 該当 ディ レク トリ に 書き 込み , 
ディ レク トリ を 更新 し て , 新しい ファ イル と し て 完成 させ な けれ ば な ら な い . 読み 出し の み の フ ァ イ 
ル 操 作 で は , オー プン し た ファ イル を クロ ー ズ する 必要 は な い . 

クロ ー ズ の ファ ンク ショ ン が 正常 に 行わ れ た 場合 、 人 A 人 レジ スタ に は , ディ レク トリ ・ コ ー ド の 0, 1., 
2, 3 の いずれ か の 値 が 格納 され て いる . クロ ー ズ する ファ イル が 存在 せ ず 、 クロ ー ズ で き な か っ た 
場合 は , A レ ジス タ は FFH が 格納 され て いる . 


CALL 手 順 
MVI C」。 19…… (=13H) 
(D, E) FCB ア ドレ ス 
CALL 0005H 


2 
(該当 ファ イル の 削除 が 行わ れ た 場合 は , A レ ジス タニ 0, 1, 2, 3 いずれ か の 値 が 格 
納 さ れ て お り , 該当 ファ イル が な か っ た 場合 は , A レ ジス タニー255 ニ FFH と な る ) 


機能 
(D, E) レジ スタ で アド レス され る FCB が 示す ファ イル を ディ スク 上 か ら 削 除 す る . ファ イル 名 に は 
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至 シ ステ ム ・ コ ー ル 徹底 解説 


"ァイル ・ マ ッ チ 記号 *?? や **? を 使用 する こと が で きる .。 また , ドラ イプ ・ コ ー ド “dr” に ド 
ライ プ ブ No. を 指定 する こと に より , 任意 の ドラ イプ 上 の ファ イル を 削除 する こと が で きる . 

該当 ファ イル が 削除 され た 場合 は 、A レ ジス タニ 0, 1, 2。 3 の, いずれ か の ディ レク トリ ・ コ ー 
ド が 格納 され て いる . 該 当 フ ァイル が 存在 せ ず , 削除 が 行わ れ な か っ た 場合 は .A レ ジス タニ 255= ニ FFH 
が 格納 され て いる . 


CALL 手 順 

MVI C。21…… (=15H) 

(D, E) FCB ア ドレ ス 

CALL 0005H 

セ 

(書き 込み が 正常 に 行わ れ た 場合 ,A レ ジス タ =00, ディ スク が フル で 書き 込み が で き な 

か っ た 場合 は . A レ ジス タ は , 00 以 外 の 値 が 格納 され て いる ) 
機能 
ブフ ァ ジ クション: 20 の シー ケン シャ ル ・ リ ー ド と 。 人 覆 の 動作 を 行け 。 
(D, E) レ ジス タ で アド レス され る FCB が 示す ファ イル の レコ ー ド ("cr? フ ィ ー ル ド が 示す ) に , DMA 
バッ ファ の 128 バ イト が 書き 込ま れる . “cr” の 値 は 自動 的 に 1 だ け イ ンク リ メ ン ト され, 次 の レコ ー ド 
の 書き 込み に 備え られ る . 
現在 の ロジ カル ・ エ クス テン ト (1 ロジ カル ・ エ クス テン ト は , 8 インチ 標準 ディ スケ ッ ト の 場合 , 
16K バ イト ) が フル に な っ た 場合 ("cr' が オー バ ・ フ ロー し た 場合 ), 自動 的 に 次 の ロジ カル ・ エ クス 
テン ト が オー プン され , “cr′ の 値 が 00 に リセ ッ ト さ れる . 
当 フ ァ ン クシ ョ ン : 21 を 実行 する に は , 事前 に "ファ イル の オー プン ” ある い は “ファ イル の 作成 ? 
ファ ンク ショ ン を 実行 し て お か な けれ ば な ら な い . 
書き 込み が 正常 に 行わ れ た 場合 、A レ ジス タ に は 00 が 格納 され て お り , デ ィ ス ク が フル に な り , 書 き 込 
み が で き な か っ た 場合 は ,、 A レ ジス タ に は 00 以 外 の 値 が 格納 され て いる . 


ファ ンク ショ ン : 22… フ ァイル の 作成 


CALL 手 順 
MVI C, 22…… (16H) 
(D, E) FCB ア ドレ ス 
CALL 0005H 
和 す 
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シス テム ・ コ ー ル 徹底 実習 


(ファ イル の 作成 が 行わ れ た 場合 は ,、 A レ ジス タニ 0, 1, 2, 3 の いずれ か , 作成 が で 
き な か っ た 場合 ,A レ ジス タニー255=FFH が 格納 され て いる ) 
機能 
(D, E) レジ スタ で アド レス され る FCB 上 の ファ イル 名 を 持つ ファ イル (内 容 は まだ 空 ) を 作成 する . 
つま り , 新 フ ァイル の ディ レク トリ を ディ スク に 登録 する . 
作成 し よう と する 新 フ ァイル 名 は , 同一 ディ スク 上 に ある ファ イル と 同じ ファ イル 名 を 使っ て は いけ 
な い . ファ イル 名 が 同じ も の が 2 つ で き て し まい , お か し な こと に な っ て し まう . この よう な こと を 
避け る た め , PIP や SAVE コ マン ド で 経験 さき れ て いる よう に , 通常 は . すでに 存在 する ファ イル と 同一 
名 の ファ イル を , 事前 に た ファ ンク ショ ン : 19 で 削除 し て か ら , “ファ イル の 作成 ? を 実行 する . ある い 
は , ED で 行わ れ て いる よう な ファ イル 名 の エク ステ ンション を ". $$$” や `. BAK′ な ど に 変更 す 
る の も よい . 
当 フ ァ ン クシ ョ ン を 実行 し て , ファ イル の 作成 が で きた 場合 は , A レ ジス タ に は , 0,。 1, 2, 3 い 
ずれ か が , また , ファ イル の 数 が 制限 いっ ぱい で ファ イル が 作成 で き な か っ た 場合 は , 255=FFH が デ 
ィ レ クト リ ・ コ ー ド と し て 格納 され る . 
* フ ァイル の 作成 / に より ファ イル が で きる と , その ファ イル は すでに オー プン され た 状態 に あり , 
自由 に リー ドブ ラ イト 可能 で ある パフ ァイル の オー プン ”? の ファ ンク ショ ン を 再度 実行 する 必要 は な い . 


実習 プロ グラ ム ファ ンク ショ ン : 16, 19, 21, 22, (20) 


PIP コ マン ド に 相当 する よう な , ファ イル ・ コ ピー の プロ グラ ム を 作成 する . 
PIP は 一 度 に 16K バ イト 分 ディ スク か ら 読 み 出 し バッ ファ リン グ す る が , 当 プ ログ ラム で は 1 レ 


コー ド (128 バ イト ) ずつ の “読み 出し 一 書き 込み ′ を 行い な が ら コ ピー を 進め る . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


ヨコ フ 


至 シ ステ ム ・ コ ー ル 徹底 解説 


に 1 に 


OiOO OE1O 
O102 216COO 
O1O5 11FFO1 
0O108 7E 
0O109 12 
O1OA 2 さ 
O1OB 1 さ 
OiOC oOD 
O1OD C2O8O1 


O11O OEOF 
O112 11FFO1 
O11S5 CDOSOO 
O118 FEFF 
O11A CAS601 


O11D OE1 さ 
O11F 11SCOO 
O122 CDOSOO 


O125 OE16 
0127 11S5COO 
012A CDO5OO 
012D FEFF 
O12F CASCO1 


O1 さ 2 AF 
O1 さ くさ さ 21FO2 
O1 さ 6 さ 27COO 


0139 OE14 
O13B 11FFO1 
01SE CDOSQO 
QO141 FEOO 
O14 さ C268O1 


O146 OE1S 
O14 昌 11SCOQ 
O14B CDOSOQO 
O14E FEOO 
015O C26201 
0153 CS ささ 901 


O1S6 11 昌 4O1 
O1S59 C さ 7EO1 


O1SC 119CO1 
O1SF C さ 7EO1 


0162 11BAO1 
O165 ヒ さ 7EO1 


O168 OE1O 
O16A 11SCOO 
O1e6D CDOSOO 
O17O FEFF 
O172 CAZ7BO1 


O175 11E9O1 
0178B CS7EO1 


O017B 11D1O1 


NXTRECs 


に 。 10H 

H。FCBWD+10H 

D,FCBW5S 

AN アド レス 5CH か ら の FCB 内 の セカ ンド ・ フ ァ 

D イル 名 (アド レス 6CH か ら 格 納 さ れ て いる ) 

本 を , ソー ス 仙 の FCB ア ドレ ス に 転送 . 

に 3 

FCBG* ト 0 ロ V 

C。15 

D,FCB$S ソー ス 仙 の FCB で 示さ れる ファ イル を オー プ 

OoQSH ン す る . オー プン レ し よう と する ファ イル が な 

255 い 場 合 は .*OPNERR" へ ジャ ンプ . 

OPNERR 

C。19 デス ティ ネー ショ ン 側 〈 新 し ご 生成 す さる 全う の 

D。FCB$D FCB で 示さ れる ファ イル と 同一 名 の ファ 

QooOSH の ラン イル を 電 除 す 

っ 1 

Te する (と 生じ 、 オ ー プ ン 

255 状態 に な る ). ファ イル 数 が 制限 いつ ぱい の 

MAKERR 場合 は "MAKERR" へ ジャンプ. 

1 D こ W ム ムル ーー 
両方 の FCB の レコ ー ド ・ カ ウン ト C'cr" フ ィ 

FCB$S+ さ 2 G At 

ーー | ルド ) を 00 に セット する . 

C,20 ソー ス ・ フ ァイル を 1 レコ ー ド 読み 出す . DMA 

D,FCBWS アド レス は デフ オール ト 信 の 80H で ある の で 
読み 出さ れ だ デー タ は 80HーFFH に 格納 され 

oO る . ファ イル ・ エ ンド に な つ だ 場合 は ,“CPY 

CPYEND END" へ ジャ ンプ . 

人 | DMA/ パ ッ フ ァ の 1 レコ ー ド 分 を ディ スク に 書 
き 込 む . ディ スク フ が ガザ フル に な つて 空き ま ス ペー 

o ス が な い 場 合 は , "WRTERR" へ ジャ ンプ . 

MRTERR 

NXTREC ーー 次 の レコ ー ド の 読み 出し レ ヘ ループ . 

D, MBGBER に ス ・ フ ァイル が な い 場 合 の エラ ー・ メ ッ セ 

MSGOUT ー ジ 出力 . 

D, MSBMER ン ファ イル の 数 が 制限 いつ ば い の 場 合 の エラ ー 

MSSOUT ・ メ ッ セ ー ジ 出力 . 

D, MSGwER か 空き エリ ア が な い 場 

MSBOUT 合 の エラ ー・ メ ツ セ ー ジ . 

C。16 

コピ ビー の 者 き ジー トー ザー ニー デス 

の ティ ネー ショ ン ・ フ ァイル を フロ ー ズ する 

25S クー ズ で き な い 電 は 。*OLSERR^ へ ジャ 

CLSERR ンプ . 

D,MSGEND いま 

PrRND | コピー 作業 綴 了 の メッ セー ジ 出 . 

D。MSBCER フロ ー ズ ・ エ ラー の メッツ セー ジ 出 力 . 


シス テム ・ コ ー ル 徹底 実習 


| メッ セー ジ 出 力 の サブ ルー チン . 


O184 ODOAOAS さ 4F MSGSERs ODH, OAH。OAH。 "SOURCE FILE GA NAI' 。ODH。OAH。 "7 

019C ODOAOA4649 MSGMERs ODH。OQH。OAH。"FILE DIRECTORY BA か 
O1BA ODOROA4449 MSGMERs ODH。 OAH。OAH。" DISK SPACE BA NATI"' 。ODH。OAH。" を 

O1D1 ODOAOA4649 MSBCER* ODH。 ORAH。OAH。" FILE CLOSE DEKINAI" 。ODH。 OAH。" ま " 

O1E9 ODOAOA4 さ 4F HBSGENDs ODH。 ORH。 OAH。" COPY DEKINABHITA" 。ODH。OAH。" ま " 


O1FF FCBW5s 
02OE 
A> 


Figure-2.2.31 ファ ンク ショ ン :16, 19, 21, 22 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 
上 記 ソ ー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ブル し , “19-21-22 . COM” 
を 生成 し て 実行 し て み ま し ょ う . 
ファ ンク ショ ン : 16.19, 21, 22 実 習 プ ログ ラム の 実行 
当 プ ログ ラム を 実行 する た め の コ マン ド の 書式 を 次 に 示し ます . 


19-21-22,x : filenamel . extx': fiename2 . ext 
(新しく 生成 され る 側 ) (ソー ス 側 ) 


この コマ ンド を 実行 する こと に より , ドラ イブ x': 上 の ファ イル \fiename2 . ext が , ドラ イブ 
X : 上 に ファ イル “flename1 . ext と し て コピ ー さ れ ま す . 

実行 例 と し て , ドラ イブ A : 上 の ファ イル “DUMP . ASM” を , ドラ イプ B : 上 に , ファ イル 名 を 
*DUMPCPY . ASM” と し て コピ ー し た 例 を 示し ます . 


A> 1 ワー21-22 BsDUMPCPY.ASM DUMP. ASM/ --filename 1 と filename2 の 大 序 に 注意 . 


COPY DEKIMABHITA コピ ー が 完了 した だ メッ セージ. 


QA>DIR BsDUMPCPY。ASH/) ドラ イブ B : 上 に "DUMPCPY. ASM" と し て コピ ー さ れ だ ファ イル の 確認 . 
Bs DUMPCPY ASHN - フ ァイル が 作ら れ て いた だ. 


A>TYPE BiDUHMPCPY . ASN / 新しく 作ら れ だ ファ イル の 内 容 の 確認 . 


に に) 


至 シス テム ・ コ ー ル 徹底 解説 


FILE DUMP PROGRAN。 READB AN INPUT FILE QAND PRINTS IN HEX 


H 

日 

5 COPYRIGHT (C) 1975。 1976。 1977。 1978 
9 DIBITAL RESEARCH 
H 
H 
日 


BODX 579。 PACIF1IC GROVE 
CQL IFURNIA。 93 さ 95O 
ORG 100H 
BDO0S EQU OOO5H 3 DS ENTRY POINT 
CONS EQU 1 READ CUNSOLE 
TYPEF EQU 2 3 TYPE FUNCTIUN 
PRINTF EQU 9 3 BUFFER PRINT ENTRY 
BRKF EQU 11 3 BREAK KEY FUNCTIHN (TRUE IF CHAR_ READY) | 
OPENF EQU 15 #FILE OPEN レ 
READF EQU 20 3READ FUNCTION る 
・ T 
・ を 
れ 
4 
ロ い 
= る 
UPNMYSGI DB CR。LF。"ND INPUT FILE PRESENT UN DISK$?* 
日 VARIABLE AREA 
IBPs DS 2 3 INPUT BUFFERK PUINTER 
QLDSPI DS 2 5sENTRY BP VALUE FROIM CCP 
H 
5 STACK AREA 
DS 64 s RESERVE さ 2 LEVEL STACK 
STKTOF* 
日 
END 


A> ご この よう に , 新しく コピ ー さ れ だ ファ イル は , オリ ジ ナ ル の `DUMP. ASM” と 同一 で ある こと が 確認 され だ . 


Figure-2.2.32 ファ ンク ショ ン : 16, 19, 21, 22 実習 プロ グラ ム の 実行 と その 確認 . 


実行 する 際 に は , ソー ス 側 と オプ ジェ クト 側 (新しく 生成 され る 側 ) の ファ イル 名 を 逆 に 指定 し な 
いよ うに 注意 し て 下さ い 。 1 レコ ー ド (28 バ イト ) ずつ リー ドブ プラ イト が 行わ れん ます の で , ドラ イプ 
が せわ し な く 動 作 し ます が あし か ら ず . 

また , オプ ジェ クト 側 に , すでに 存在 し て いる ファ イル と 同一 名 を 指定 し て 実行 し た 場合 , 元 あっ 
た ファ イル が 削除 され て , 新しく コピ ー さ れ た も の に な っ て いる こと も 確認 し て 下さ い . 


0 


シス テム ・ コ ー ル 徹底 実習 


CALL 手 順 
MVI C, 18…… (12H) 
CALL 0005H 


昌 
(結果 は A レ ジス タ に 格納 され て いる ディ レク トリ ・ コ ー ド , お よび DMA バ ッ フ ァ に 格納 
され て いる ディ レク トリ の 内 容 で 示さ れる ) 
機能 
前 回 の サー チ で 一 致し た ファ イル か ら 後 の 部 分 の ディ レク トリ を 対象 に ,。 ファ イル を 捜す . その 他 の 
こと は , ファ ンク ショ ン : 17「 最 初 の ファ イル ・ デ ィ レ クト リ の サー チ 」 と 全く 同一 で ある 。. 


実習 プロ グラ ム ファ ンク ショ ン : 18,(17) 


DIR コ マン ド に 相当 する プロ グラ ム を 作成 する . ファ ンク ショ ン : 17 の 「 最 初 の サー チ 」 を 作っ 
て , 最初 に 一 致し た ファ イル 名 を タイ プア ウト し , その 後 は ファ ンク ショ ン : 18 の 「 次 の サー 


チ 」 を 使っ て , 一 致し た ファ イル 名 を 次 々 と タイ プア ウト する . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


紀 1 


至 シ ステ ハム ・ コ ー ル 徹底 解説 


NXTFILEs 
O1QD O707Q70707 RLC! RLC! RLC! RLC! RLC 
Oo112 5F MOV E。A 見 つか つた ファ イル ・ - テ ィ レ クト リ の . DMA 
O11 さ 1eoo MVI D,O (0 ツラ デポ デフ オル 960H-FFHD の あ 
O115 21ooOo LX1 H。 OOBOH ドレ ス 
O11 昌 19 DAD p : 
O119 2 さ INX H ーー ドラ イブ No. で dr* フ ィ ー ル ド ) は ご ご で は 午 略 . 
O11A 0O6OB MV1 人 3ECS ファ イル 名 *"XxxXXXXX(.)X メ xx” で 1 文字 . 
DUTLPi 
O11C CSE5 PUSH~ B! PUBSH H 
O11E OEO2 MVI いっ 電 ー lew パッ ファ 内 の 求め られ だ アド レス (見 つ 
O12O SE MOV E。M 本 1 文字 ずつ 
O121 CDO5oo CALL ooo5H | だ 人 YS 
O124 E1C1 POP H! POP B コン ソー ル へ の 出力 “ファ ン フ ショ ン を 使用 . 
0 DC 3 | 11 旋 し だ かど う の 所 ルー チン 
O127 05 DCR 文字 分 ルー ブ す 
O12B C21CO1 JNZ P 
O12B OEO9 MVI C,9 | 
O12D 117 さ O1 LXI D。MSGCL : 復帰 ・ 改 行 を 出力 . 
oO1 さ oO CDO5oo CALL ooosH | 『 
Oo1 さ ミ oE12 Mvr 。1BB |* 學 の ファ イル の サー チ * の シス テム ・ コ ー ル . 
O1 さ 5 CDOSOO CALL OOO5H | FCB ア ドレ ス は 同じ ベ マデ フォ ー ル ト の 5CH 
013B FEFF CPI <2S5 一 致す づる ファ イル が さら に あれ ば `NXTFILE” 
Q1 さ QA CA4901 JZ ENDFILE : へ ジャ ンプ し て , ファ イル 名 を タイ ブ ア ウ ト . 
O13D CSODO1 JMP NXTFILE | な けれ ば *ENDFILE" ヘ ジャ ヤン プ . 
NOFILEs 
O14O OEO ウ MVI C。9 
O142 1152O1 LXr 5riaeNoe | ファ ルプ sur の メッ セー ラ Hi カ ルー テン 
Oo145 CDO5oo CALL OoO5H 
Q148 C9 RET 
ENDF ILE 
O149 OEO9 MVI 9 < の ッ セ ー ジ を し て , 当 
O14B 1160O1 し XI prreeep 6 の CP ノ M に 戻る 
O14E CDO5oOo CALL OOO5H 
O151 C9 RET 
O152 ODOaAOn4649 MSGNDF』 DB ODH。OAH。 OAH。" FILE NAT 。ODH。 ORH。" 
O16O ODOAOA4649 MSGBED: DB ODH, OAH。 OAH。 "FILE OMART" 。ODH。 ORH。" を" 
QO17O ODOa24 MSGCL: DB ODH。 OAH。" $* 


Figure-2.2.33 ファ ンク ショ ン :18, 17 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り ,。 アセ ンプ ブル し て , "17-18 . COM? 
を 生成 し 実行 し て み ま し ょ う . 


2 


シス テム ・ コ ー ル 徹底 実習 


ファ ンク ショ ン : 18,17 実習 プロ グラ ム の 実行 
当 プ ログ ラム は , 次 の コマ ンド 形式 で 実行 し ます . 


1) 17-18ーx : fename . ext 用 …… ドラ イプ ブ x : 上 の 特定 の ファ イル 名 を タイ プア ウト . 
2) 17-18」x : filemach す …… ドラ イプ x : 上 の ファ イル ・ マ ッ チ する ファ イル 名 を すべ て 
- タイ プア ウト . 


次 に 実行 例 を 示し ます . 


RA>17-18 PIP.COM / ロブ イン ・ デ ィ ス フ 上 の ファ イル *PI P. COM" を 捜す 
ファ イル は 存在 し て いた だ . 


Figure-2.2.34 ファ ンク ショ ン :18, 17 実習 プロ グラ ム の 実行 . 


人 AA>17ー1 日 8』%。COM 7 -- フ ライ ル ・ マ ツチ 記号 を 使 つ て , ドラ イブ B : 上 の エクス テン ショ ン が 
*COM" で ある ファ イル を 捜す . 

COBQL CON 

RUNA - CONM | - 

FILENARKCON 


FILE OMARI 
> 


Figure-2.2.395 プラ イマ リ ・ ネ ー ム に ファ イル ・ マ ッ チ 記号 を 使用 し た 実行 例 . 


人 A>17ー1 日 旨 』$。$ / ファ イル ・ マ ツチ 記号 を 使っ て , ドラ イブ B : 上 の すべ て の ファ イル を 捜す . 


COBOL CON 
COBOL 1O1 
102 
IO さ 
COBOL IO4 
CON 


CONFIG COM すべ て の ファ イル が ガタ イブ プア ウト され だ . 
Pi CBL 

CBL 

CBL 

ASM 

PRN 


に に 1 


全 シ ステ ム ・ コ ー ル 徹底 解説 


Figure-2.2.36 ファ イル ・ マ ッ チ 記号 だ け を 使用 し た 実行 例 


この よう に , タイ プア ウト され た ファ イル 名 の 頭 に ドラ イブ 名 は 付き ませ ん が , DIR コ マン ド と 同様 
な 働き を し ます (CP/M version1.4 の DIR は , 上 記 実 行 例 の よう に 縦 一 列 に ファ イル 名 が 並ん だ ). 
ファ イル ・ マ ッ チ 記号 の “~? ? を 使っ た 例 も 実験 し て みて 下さ い . 


| 
ファ ンク ショ ン : 23… フ ァイル 名 の 変更 


CALL 手 順 
MVI の oss (17H) 
(D, E) で CB アド レス 


GATLL 0005H 
(A レ ジス タテ 0, 1。 2。 3 の いずれ か .。 …… 変更 が 正常 に 行わ れ た 場合 . 


A レ ジス タニ 255=FFH. …… 目的 の ファ イル が 存在 し な か っ た 場合 ) 
機能 
(D,、E) レジ スタ で アド レス され る FCB 内 の 1st フ ァイル 名 (dr-t3 フ ィ ー ル ド ) を , 2nd フ ァイル 名 
(dd」。 フ ィ ー ル ド ) に 変更 する . 
ディ スク ・ ド ライ ブ の 選択 は , 旧 フ ァイル 名 と な る 1st フ ァイル 名 の 頭 に 付け られ る ドラ イブ ・ コ ー ド 
*dr” に よっ て 行わ れ , 新 フ ァイル 名 の ドラ イブ ・ コ ー ド “d。” は , 値 が 入っ て いて も 無視 され る . 
ファ ンク ショ ン 終 了 時 。 ファ イル 名 の 変更 が 正常 に 行わ れ た 場合 は 、 A レ ジス タ に は 0, 1, 2, 3 
いずれ か の ディ レク トリ ・ コ ー ド が 格納 され , 変更 し よう と する 目的 の ファ イル (1st フ ァイル 名 ) が 
存在 し な か っ た 場合 は 255 ニ FFH が 格納 され る . 


実習 プロ グラ ム ファ ンク ショ ン : 23 


REN コ マン ド に 相当 する プロ グラ ム を 作成 する . 


4 


シス テム ・ コ ー ル 徹底 実習 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


A>TYPE 2 くさ.PRN / 


# FUNCTIUN 2 さ 』 RENAME FILE 
aData oh 日 
oO1oo DRG 100H 
STARTs 
O1OO _OE17 MV に ビ 。2 さ 
O102 115COO LX1i D, ooS5Ch | い フ ァイル 名 の 変更 * の シス テム ・ コ ー ル . 
O1O5 CDOSoO CALL OoO5H | FCB ア ドレ ス は , デ フォ ー ル ト の 5CH と する . 
01O8 3C INR 人 | 目 8 の ファ イル が な ガ つ だ 場合 は , *ERR“ へ 
0109 CA15O1 JZ ERR ) ジャ ンプ . 
O1OC OEO5 MVi C。9 
O1OE 111EO1 LXi D, MSGDK マレ ODERL 
O111 CDOS5OO CALL OOQ5H ak 
O114 C9 RET 
ERRi 
O115 OEQO9 MVi ヒ ,9 ] 
0117 112501 LXI D。 MSBERR | 目 89 の ファ イル が な か つ だ の で , エ ラー・ メ ッ 
O11A CDO5oQ CALL OOO5H | セー ジ を 出力 レ ,CPM へ 戻る . 
O11D C5 RET 
O11E ODOA4F4BOD MSBHK』 DB ODH。OAH。 "DK" 。 ODH。OAH。" ま * 
O125 ODOA455252 MSBERR: DB - ODH。 OnH。* ERROR" 。 ODH,。 OAH。" ** 
O12F END 


Figure-2.2.37 ファンクション :23 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ン ブ ル し , “23 . COM” を 生成 
し て 実行 し て み ま し ょ 2. 


ファ ンク ショ ン :23 実習 プロ グラ ム の 実行 
当 プ ログ ラム は , 次 の コマ ンド 形式 で 実行 し ます . 


23ーx : oldfilename . ext_inewfilename . ext す …… ドラ イブ x : 上 の I 旧 ファ イル 名 / を , 
^ 新 ファ イル 名 ” に 変更 する . 


REN コ マン ド と は , 新 ・IH フ ァイル の 順序 が 異な り ま す の て で 注意 し て 下さ い . 実行 例 を 次 に 示し ま 
。 
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全 シ ステ ハム ・ コ ー ル 徹 庶 解説 


A>DIR / 実習 プロ グラ ム 実 行 前 の 全 フ ライ ル を 確認 レ し て お ぐ . 


nz SC COM 』 SC OVL 』 INSTALL COM 』 INSTALL DAaT 
As INSTALL ロ VL 』 BALANCE CAL 』 BARRIER CAL 』 BRKEVN CAL 
Ri INSTALL SUB 』 2 さ CON 


\、 突 習 プ ログ ラム . 


Figure-2.2.38 実行 前 の オリ ジ ナ ル ・ デ ィ ス ケッ ト の 全 フ ァイル を タイ プア ウト し て 確認 し て お く 


人 A>2 さ SC.COM SUPERCAL. COM ) SC.COM" 叶 YSUPERCAL. COM" に リネ ー ム する . 
OK 正常 に 変更 が 行わ れ だ メッツ セージ. 
人 > 


Figure-2.2.39 ファ ンク ショ ン 23 実習 プア ログ ラム の 実行 例 ①. 


A>DIR) 結果 の 確認 . 


ni SUPERCAL COM : SC DVL 』 INSTALL CONM 』 INSTALL DaT 
ns INSBTALLN OUVL : BALANCE CAL 』 BARRIER CAL 』 BRKEVN CAL 
人 INSTALL SUB 』 2 さ COHM 

人 > 


リネ ー ム され て いる . 


Figure-2.2.40 実行 例 や の 結果 の 確認 . 


ログ イン ・ デ ィ ス ク を B : に チエ ンジ . 
B>Az 23 SC.OVL CSUPERCAL . DVL ) -- ド ライ ブ A : 上 の ^SC. OVL” を , ドラ イブ 名 *C : "を 付け だ 
SRCSEU の の  )) 0 oo SURERGAERENWER に お な の 


QK -- 正 常に 変更 が 行わ れ だ (2nd フ ァイル の ドラ イブ 名 は 無視 され る こと の 確認 の だ め ) 
メッ セー ジ : 


B> 


Figure-2.2.41 ファ ンク ショ ン :23 実習 プロ グラ ム の 実行 例 ②. 


B>DIR as) リネ ー ム され て いる . 
この よう に 209 フ ァイル の ドラ イプ は 無 軸 され る . 
Ai SUPERCAL CDN :』 SUPERCAL\OVL 』 INSTALL COM 』 INBTaLL DaT 


As INSTALL ロ VL 』 BALANEE CAL : BARRIER CAL 』 BRKEVN CAL 
fs INSTALL SUB 』 2 さ CON 
B> 


Figure-2.2.42 実行 例 ② の 結果 の 確認 . 


に ! に ) 


シス テム ・ コ ー ル 徹底 実習 


ファ ンク ショ ン : 24… ロ グイ ン ・ ベ クト ル の 取り 出し 


CALL 手 順 

MVI 2 (18H) 

CALL 0005H 

虹 
(H. ル レジ スタ の ログ イン ・ ベ クト ル が 格納 され て いる ) 

機能 
現在 , オ ン ラ イン と な っ て いる ディ スク ・ ド ライ ブ の ベク トル を 報告 する . "オンライン と な っ て いる ? 
と は , CPM の 起動 ,。 ある い は リブ ー ト 以後 に ログ イン され た ドラ イブ , も し く は 自動 ディ スク ・ セ 
レク ト (FCB の “dr” フィ ー ル ド に よる ) され た こと の ある ドラ イブ の こと で ,。 これ ら の ドラ イプ は , 
それ ぞ れ の ディ レク トリ 情報 が CPM に 登録 済 で ある . 
分 か りや すい 例 で は , STAT コ マン ド を “STAT』” と 実行 し た 場合 に 結果 が 表示 され る ドラ イブ が , 
オン ライ ン と な っ て いる ドラ イブ で ある 。. 
取り 出さ れ た ベク トル は , (H, し ) レジ スタ に 次 の よう に 格納 され て いる . 


トーーーーー ニ ーー ーー: NII レ ジス ターーーーーーーー ーー ふ ーーーーーーー し レジ ス ターーーーーーーー へ 、 
ドラ イブ 名 一 ww 
bit 7 bit0 bit 7 bit 0 


0 : オフ ライ ン 


2 の ドラ イブ で ある . 


それ ぞ れ の ビット が | 


CALL 手 順 
MVI C。 25…… (=19H) 
CALL 0005H 


2 
(A レ ジス タ に ログ イン ・ デ ィ ス ク No が 格納 され て いる ) 


フ 


全 シ ステ ム ・ コ ー ル 徹底 解説 


機能 

現在 選択 され て いる ディ スク (ログ イン ・ デ ィ ス ク と か , カレ ント ・ デ ィ ス ク と か 呼ぶ ) の No を 報告 
する . 

A レ ジス タ の 値 が 0 の 場合 ドラ イブ A : , 1 の 場合 B :,。…… 15 の 場合 : P と な る . 


実習 プロ グラ ム ファ ンク ショ ン : 25,26 


現在 の ログ イン ・ ベ クト ル と ログ イン ・ デ ィ ス ク No. を 取り 出し て , ログ イン ・ ベ クト ル が 格納 
され て いる (HH, L) レジ スタ の ビッ ト 状 態 を 表示 し , ログ イン ・ デ ィ ス ク No. が 格納 され て い 
る A レ ジス タ の 値 を 表示 する . 


この プロ グラ ム PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


人 >TYPE 24-25.PRN 』/ 


322 ニッ Ks を ニニ ュー っ oo 日 
』。。 FUNCTION 24』 RETURN LBTN VECTOR 9 
8 25』 RETURN CURRENT DIBK 1 
』 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ! 
ooo RG 1ooH 
BTARTs 
otoo さ 196o1 Lxr SBP。 BTACK - 当 プロ プラム は , スマ ツク が 染 こ な る の で , 
新た に 設定 する . 
Oo1os CDS2o1 CALL 。 CRLFOUT--- 複 帰 ・ 改 行 を し て お あこ. 
O1o6 QE18 MVI C,24 ログイン. ペク トル の 了 う 出し * の シス テム 
o1O8 CDo5oo CALL ooosH 「 コ ー ル 
H,L レ ジス タビ ベク トル が 得 ら れる . 
oloB 7C Mav AiH ] 時 
O1OC CD2CO1 CALL BrTour 」 リ レ ジ スタ の ピッ ト - パ ター ン を 出力 . 
O1oF 1E24 MVI Eu いき" 」 ロレ ジス タダ と し レジ スタ を 区 釣り る だ め に 
O111 CD46O1 CALL GONour 人 出力 . 
o114 7D MOV 了 に 
O115 CD2CO1 CAEL いけ 4 設 gi パ バターン を 出力 
O118 CD5201 CALL CRLFOUT 
O11B CD52o1 CALL CRLFuT| 飼 上 ・ 改 行 を 2 出力 
O11E OE19 MVI C。25 。 |“ ロブ イン ディスク フ No. の 取り 出 レ ” の シス テ 
o12o CDo5oo CALL OOO5H 「 の: コール. ドラ イブ No. ガ A レ ジス タビ 得 ら 
O123 CDSDo1 CALL 。 HEXDBPLY -- ヘ レジ スタ の 値 を 16 進 表示 . 
oO126 CD52O1 CALL 。 CRLFOUT-…. 香 帰 ・ 改 行 を 出力 
o129 Csoooo JP OOOOH -… リ ブー ト し て CP/M に 戻る . 


に に ] 


シス テム ・ コ ー ル 徹底 実習 


BITOUUT ョ 
MVI B, 昌 
LUOPs RLC 
JC ロ UT1 
MVI E。'O* 
CALL CONOUT 
DCR B A レ ジス タ の 値 を , 0- 1 の ビ ピット ・ パ ター ン 
NZ LOOP で 表示 する サブ ルー チン . 
RET ピッ ト 7 が 左側 , ビッ ト 0 が 右側 と し て , 1 回 に 
OUT1: 1 ピット ず つ 順 に 出力 され る 
MV EE 
CALL CONOUT 
DCR B 
JNZ LOOP 
RET 
CONOUTs 
PUSH PSM! PUSH B! PUSH H | 
P を E レ ジス タ が 持つ アス キー・ コ ー ド を 
CALL ooo5H 2 0 
ec 隊 計 ル に 出力 する サブ ルー チン 
RET 
CRLFOUT ョ 』 
MVI E,ODH | 
CALL CON ロ UT きま 
が OH aa 改行 を 出力 する サブ ルー チン . 
CALL CONOUT 
RET 
HEXDSPLY』 
PUSH PSM 
RRC! RRC! RRC! RRC 
CaLL HOUT1 
POP PSM 
5 A レ ジス タ の 個 を 16 送 で コン ソー ルビ 出力 
| する サブ ルー チン . 
CPI SAH 例え ば 創 が 7 FH で あれ ば コン ソー ル に 
JC HOUT2 パフ F? と 出力 
ADI y。 
HOUT2』 MOV E。Aa 
CQLL CONOUT 
RET 
DS さ 2 
STACK EQU 1 スタ ッ ク ・ エ リア 
END 


Figure-2.2.43 ファンクション:24, 25 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ブル し , “24-25 . COM” を 
生成 し て 実行 し て み ま し ょ う . 


に に ) 


至 シス テム ・ コ ー ル 徹 克 解 説 


ファ ンク ショ ン : 24,25 実習 プロ グラ ム の 実行 
当 プ ログ ラム を 実行 する コマ ンド 形式 は 1 種類 で あり , 決 に 示し ます . 


24-25 J…… た だ これ だ け . 


次 に 実行 例 を 示し ます . 他 の ドラ イプ へ の アク セス や 。 ログ イン ・ デ ィ ス ク の 変更 に 注目 し て 下さ 


い 。 


| ce M 中 動 | 


A>24-25/ CPM が 起動 し た 直後 の 実行. 
OO0OOOOOWOOOOO0O1 ドラ イブ A : の み オ ン ラ イン . 
OO - ログ イン - デ ィ ス フ ( カ レン ト ・ デ ィ ス ク ) は A : 。 


A>DIR Bs/ ドラ イブ B : を アフ セス し て みる (例え ば DIR な ど で )、 


Bi SC COM 』 BC DUVL 』 INSTALL COM 』 INBTALL DAaT 
B』 INSTALL ロ VL 』 BALANCE CAL.』 BARRIER CAL 』 BRKEVN CAL 
Bs INSTALL BUB 


A>24-25 / -- 再 度 実 行 . 
OOOOOOOOWOOOOOO1 1 ドラ イブ B : も オン ライ ン と な りら , 現在 A : と B : が オン ライ ン で ある . 
OO 。 ログイン. ドラ イブ は A : 


>B』i)/ ドラ イプ を チェ ンジ し て , 日 : に ログ イン し な. 、 
B>As 24-25/ - -- ド ライ ブ A : 上 の 当 プ ログ ラム を 実行. 


OOOQOOOOO$OOOOOO11 AB: 共に オン ライ ン . 


ログ イン ・ ド ライ ブ は B : 


Figure-2.2.44 ファ ンク ショ ン 24, 25 実習 プロ グラ ム の 実行 


当 プ ログ ラム の 終了 は , リブート で 行っ て いま す . リプ ブー ト が 行わ れる と , シス テム 全体 が イニ シ 
ャ ル 状 態 に な り 。 ログ イン ・ ベ クト ル ,。 ログ イン ・ ド ライ ブ プ も , いっ た ん イニ シャ ライ ズ さ れ ま す . 
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シス テム ・ コ ー ル 徹底 実習 


ファ ンク ショ ン : 27… ア ロケ ーション ・ ア ドレ ス の 取り 出し 


CALL 手 順 

MVI C,。27…… (=IBH) 

CALL 0005H 

半 

(H, 上 レジ スタ に , アロ ケー ショ ン ・ ベ クト ル の ベー ス ・ ア ドレ ス が 格納 され て いる ) 
機能 
現在 ログ イン され て いる ディ スク ・ ド ライ プ の アロ ケー ショ ン ・ ベ クト ル の ベー ス ・ ア ドレ ス (先頭 
アド レス ) を 報告 する . 
BIOS 内 の アロ ケー ショ ン ・ ベ クト ル (1.1.2-3 章 参照 ) に は ,、 それ ぞ れ の ドラ イブ の ディ スク の メ 
モ リ 使用 状態 が 記録 され て お り , この ベク トル を 調べ る こと に より , ディ スク の どの 部 分 が 使わ れ て 
いる か , 残り メモ リ 容 量 は 何 バ イト か , な ど を 知る こと が で きる . 


実習 プロ グラ ム ファ ンク ショ ン : 27 


ログ イン ・ デ ィ ス ク の アロ ケー ショ ン ・ ベ クト ル の メモ リ 内 容 を ダン プ す る プロ グラ ム を 作成 
する . 

アロ ケー ショ ン ・ ベ クト ル の バッ ファ ・ エ リア の サイ ズ は , 8 イン チ 標 準 デ ィ ス ク の 場合 は 31 
バイ ト で ある (ドラ イブ 容量 243K バ イト , アロ ケー ショ ン ・ ベ クト ル の 1 バイ ト で 8K バ イト 
を 表す の で , 243/8 三 30.375 と な り , 31 バ イト で 243K バ イト の マッ プ を 表す こと が 可能 で ある . 
1.1.2 一 3 章 参 照 ). 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


>TYPE 27.PRN / 


H 
5 FUNCTIDN 27』 BET ALLOCATIDN ADDRESS  * 『 
つも HFC 8228 ここ ここ こよ WE か 了 EE 


ORG 100H 
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人 至 シ ステ ム ・ コ ー ル 徹底 解説 


STARTs * ア ロケ ーション - ア ドレ ス の 取り 出 じ "の シス 
o1oo oE1B MVI C。27 | テム ・ コ ー ル 。H,L レ ジス タ に , デ ィ ス ク ・ ド 
o1o2 Cpo5oo CALL OOQO5H | ライブ の アロ ケー ショ ン ・ ベ クト ル の ベー ス 

アド レス が 得 ら れる . 

O105 oO61F MV B, さ 1 バイ ト 表示 の カウ ンタ と し て , アロ ケー ショ ン ・ ベ クト ル ・ エ リア の 

LOOP : バイ ト 長 を セッ ト す る . こ ご の 値 は ドラ イブ に よ つ て 異な る . 
oO1o7 7E Mov An | アロ ケー ショ ン ・ ベ クト ル ・ エ リア の 先頭 か ら , 
O1OB CD1eo1 CALL 。 HEXDBPLY| 1 バイト ざ つ 16 進 で コン ソー ル に 表示 し て 行 

Ce 
O1OB SE2O VI FM | スペ ー ス を コン ソー ル に 出力 . 名 バ イト の 表 
O1OD CD2EO1 CALL CONQUT | 示 を スペ ー ス で 区 切る , 
| H,L レ ジス タ に , ア ロケ ーション ・ ベ クト ル の 

Pe SE | XX の (イト アド レス を セッ トレ て ルー プ す 
O112 C2o7O1 JNz BGP た 法 和 に で CR 7 半 ま で 
O115 C9 RET 

HEXDSPLY: 
O116 FS PUSH PSM 
0117 OFOFOFOF RRC! RRC! RRC! RRC 
O11B CD1FO1 CALL HOUT1 
は Mo レジ スタ の 値 を , 16 進 で ル に 表示 
O11F Ee6OF HOUT1g ANI OFH A レ ジ を , コン ソー ル に 表示 
O121 Ce さ oO ADr 3oH する サブ ルー チン . 
O12 く FESA CPr さ AH 
O125 Da2AO1 JC HOUT2 
O128 C6O フ 7 ADr / 
O12A CD2EO1 HOUT2』 CALL CONOuT 
oO12D C9 RET 

CONOUT: 
O12E C5E5 PUSH B! PUSH H 
O13O OEO2 MvI C, 2 
O132 5F MOV E。A | A レ ジス タ の キャ ラク タ を , コン ソー ル に 出 
o1 さ 3 CDoSoo CALL 。 OOO5H | 力 づ る サブ ルー チン . 
O136 E1C1 POP H! POP B | 
O1SB Cg RET 
Oo139 END 


Figure-2.2.45 ファ ンク ショ ン :27 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


ファ ンク ショ ン :27 実習 プロ グラ ム の 実行 
当 プ ログ ラム を 実行 する コマ ンド 形式 は 一 種類 で あり , 次 に 示し ます . 
27J…… た だ これ だ け . 


実行 例 と し て , 空 の ディ スク か ら 1K バ イト ずつ ファ イル を セー ブ し な が ら ,。 アロ ケー ショ ン ・ ベ ベク 
トル の 内 容 を 表示 し た り , 3 つの 大 き な フ ァイル の 内 , 真中 に 位置 する ファ イル を 削除 し た 場合 の 様 
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シス テム ・ コ ー ル 徹底 実習 


子 な ど を 示し ます の で , アロ ケー ショ ン ・ ベ クト ル の 働き が よく 理解 さん る も の と 思い ます . 実行 例 
を 次 に 示し ます . 


ドラ イブ B : 上 に は 空 の ディ スケ ッ ト を セッ ト し て お く ぐ . 
A>Bs) ログ イン ・ デ ィ ス を B : に チエ ンジ . 
B> 人 Ai STAT #. ま ディ スク B : 上 の ファ イル の 最初 の 状態 を 調べ る . 


Fi1e Not Found ディ スク B : 上 に は ファ イル が な い , 


B> 人 2Z 7 実習 プロ プラ ム を 実行 し , デ ィ ス フ ガ 空 の 状態 の ドラ イブ B : の アロ ケー ショ ン ・ ベ クト ル を みる 。 
co oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo co oo co oo oo oo oo co oo oo oo 
oo oo oo oo で 印 の 個 に 注目 . 


空 の ディ ス フ に , 1 K バ イト の ファ イル (ファ イル る る ^A“) を セー ブ す る . 


実習 プロ プラ ム を 実行 し , 1 K バ イト の ファ イル が セー ブ さ れ だ 状態 の ドラ イブ B : の アロ ケー ショ ン ・ ベ フト ル を みる , 
oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo coo oo oo oo co oo 
oo で 印 の 値 に 注目 . 


B>SAVE 4 B) … さ ら に 1K バ イト の ファ イル (ファ イル 名 *B) を セー ブ す る. 人 台 計 2K パ イト ガ セー ブ さ れ だ . 


3 


B>A277 実習 プロ プラ ム を 実行 し , 合 対 2K バ イト の ファ イル が セー ブ さ れ だ 状態 の ドラ イブ B : の アロ ケー ショ ン ・ 
Fo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo co oo oo oo oo 
oo oo oo oo ー 印 の 値 に 注目 . 


B>SAVE_4 CJ さら に 1K バ イト の ファ イル (ファ イル 名 *C) を セー ブ す る . 合計 3K バ イト が セー ブ さ れ だ . 


B>As2Z/ 実習 プロ プラム を 実行 し , 合計 3K バ イト の ファ イル が セー ブ さ れ だ 状態 の ドラ イブ B : の の ロケ ーション ・ ベ クト ル を みる . 
F8 OO OO Qo oo Oo oo oo oo oo oo oo oo oo oo oo oo OO OO OO OO oo Qoo OO oo oo 
oo oo oo oo ー 印 の 値 に 注目 . 


B>SAVE 12 DEF/ - 今回 は 3K バ イト に の ファ イル (ファ イル 名 *DEF) を セー ブ す る . 合計 6K バ イト ガセ ー ブ さ れ だ . 


B>Ar27/ 突 寺 プロ グラ ム 玩 し 合計 6K バ イト の ファ イル が セー ブ さ れ た 状態 の に ドラ イブ B: の アロ ケー ショ ン ・ ベ フト ル を みる . 
FF QO OO Qoo oO oO oO OO oO oo oo Oo oo oo oo oo oo oo oo oO oo oo oo oo oo oo oo 
oo oo oo oo ー 印 の 信 に 注目 . 


B>SAVE 4 日 さら に 1K バ イト の ファ イル (ファ イル 名 *G⑤ の を セー ブ す る . 人 台 計 7K パ イト が セーブ され だ . 


B>A27 7 実習 プロ グラ ム を 実行 し , 合計 7/K/ パ イト の ファ イル が セー プ ブ さ れ た 状態 の ドラ イブ B : の アロ ケー シヨ ン ・ ベ クト ル を みる 。. 
FEFJBO oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo oo 
OO OO OO OO -- 印 の 値 に 注目 . 


B> 


Figure-2.2.46 ファンクション:27 実習 プロ グラ ム の 実行 例 ① 
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至 シス テム ・ コ ー ル 徹底 解説 


ドラ イブ B : 上 に 新 を な 空 の アデ ィ ス ケッ ト を セッ ツ ト し て お く ぐ . 
B>As STAT き 。*) ディ ス フ B: 上 の ファ イル の 状態 を 調べ る . 


Fi1e Not Found--- デ ィ ス ンク: 上 に は ファ イル が な い . 


B>SAVE_12O_X/.-22 の ディ スク 上 に ,30K バ イト 〈 注 ) の ファ イル (ファ イル 名 *X ^) を セー ブ す る 。 
B>SAVE 128 Y/ こら に 32kK バ イト の ファ イル (ファ イル 名 *Y ) を セー ブ す る . 
B>BAVE 128 Z/ こら に 32K バ イト に の ファ イル (ファ イル 名 *Z ^) を セー ブ す る . 


B>AaSTAT 。$/ . 現在 の ディ ス フ B: 上 の ファ イル の 状態 を 調べ る . 


Recs Bytes Ext QAcc 
24Q さ Ok 2 R/M BsX 


256 さ 2k さ R/M BsY : これだけ セー ブ さ れ て いる . 
256 さ 2k さ R/M BsZ 


Bytes Remaining ロ n Bi 147 ト 


B> 人 27/ -… 実 習 プロ プラ ム を 実行 し て . ド ライ ブ B: の アロ ケー ショ ン ・ ベ フト ル を みる 。. 
EEEELEE_EE、EE_EE_EE 


oooooooooooooooooooooooooooooo 
0 ED の 由 に 注目 


B>ERA_Y / . 32k バ イト に の ファ イル ゞ Y “を 削除 する . 


B>ASTAT $%。 を / -- 現 在 の ディ スク フ B: 上 の ファ イル の 状態 を 調べ る . 


Recs Bytes Ext Acc 


tRNA > | ファ イル ^Y" ガ 部 除 さ れ て いる . 


Bytes Remaining ロ n B』 179k 


B>A』27 / -- 実 習 プロ グラ ム を 実行 し て , ドラ イブ B : の アロ ケー ショ ン ・ ベ フト ル を みる . 
FF FF FF FF OO.OOQOOQOOFFF! :FFFoooooooooooooooooooooooooooooo 
oo oo oo oo 


へ や 印 の 値 に 注目 . ファ イル *Y“ ガ セー プ さ れ て いた だ エリ ア が 0 に な つて いる . 
B> 


注 ) ディ レフ トリ ・ エ リア と じ て , すでに 2K バ イト が 使わ れ て いる の で , 30 十 2=32. 


Figure-2.2.47 ファ ンク ショ ン :27 実習 アロ グラ ム の 実行 例 ② 
8 イン チ の 標準 ディ スク の 場合 は 、 アロ ケー ショ ン ・ ベ ベク トル の 1 バイ ト で 8K バ イト を 表現 し ます 


が , その 1 バイ ト の み に 注 目 し て , 表現 の し か た を 解説 し て お きま す . 次 の 図 を 見 る だ け で 明らか で 
まう 。 
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シス テム ・ コ ー ル 徹底 実習 


1 ピッ ト が 1K バ イト を 表す . 


ーー】 
己 
に コ 


ー】 
ドコ 


E3 
つ 
ど | 
に 3 
トー】 


Ju EE 


Lu 
ーー】 
エエ 


8 
調 


この あと は 次 の バイ ト に 移り , 同様 の マッ ピン グ を 行う . 


Figure-2.2.48 アロ ケー ショ ン ・ ベ クト ル 内 の 1 バイト 


この よう に , 1 ビッ ト が 1K バ イト を 表し , ビッ ト ・ パ ター ン が 記録 状態 の マッ プ を 表し ます (0 = 
使わ れ て いな い エ リア , 1 = 使わ れ て いる エリ ア ). 
実行 例 の で の 部 分 が C0 つ E0ーFO0…… と 変化 し た 理由 が 理解 され た で し ょ う . 


CALL 手 順 
MVI C。28…… (1CH) 
CALL 0005H 


機能 
現在 の ログ イン ・ デ ィ ス ク を , 書き 込み 禁止 の グ ダ ィ スク (リー ド プ オン リー・ デ ヂ ディスク ) に セッ ト す 
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至 シス テム ・ コ ー ル 徹 工 解説 


る 。 つ まり 。 ラ イト ・ プ ロ テ グ クト が か けら れる 。 た だ し 。 こ の ライ ト ・ デ ロ テ ク ト は 。 コー ルド ・ ス 
ター ト や リプ ブー ト が 行わ れる と 消 減 す る . 


実習 プロ グラ ム ファ ンク ショ ン : 28,25 


STAT コ マン ド の , “STAT  x : R プ 0J” に 相当 する プロ グラ ム を 作成 する . 
た だ し , X : に よっ て 任意 の ドラ イブ を 指定 する こと は で きず 。,。 現在 の ログ イン ・ デ ィ ス ク が 
リー ド プ オン リー に 設定 され る . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


/ AA>TYPE 28-25.PRN } - 


ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 5 
』。 FUNCTIDN 2B』 MRITE PROTECT DISK 5 
3 25:』 RETURN CURRENT DISK 1 
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 9 
oloo QRG 1ooH 
STARTs EE な っ ゲー 
Ss Ah C。2g | ライト プロテクト ・ デ ィ ス ク * の シス テム ・ 
o1o2 CDo5oo CALL OO は ス フ リ 2 本 あこ 
O105 112601 LXI D,MSGDRV | 。 HK hc 
oO1oB CD2oo1 CALL nsaour |! PRVE-」 と コン ソー ル に 表示 . 
0O1OB OE19 MV C。25 | "カレ ント ・ デ ィ ス ク の 取り 出し "の シス テム ・ コ 
O1OD CDOSoQ CALL ooo5H | 一 ル .、 A レ ジス マタ に ドラ イブ No. が 得 ら れる . 
O11O 3C INR Aa | ドラ イブ No. を A, B, C, -P の ASCI コ ー ド に 
O111 F64O ロ RI O10OwOOOoB | 変換 
in 0 E。 合 | トコ ン ソ ノール へ の 出力 〈 の シス テム ・ コ ー ル で , 
0O114 OEO2 MVI Cy2 ドラ イブ る を 表示 
O116 CDO5oo CALL ooo5H : 
O119 112FO1 LXI D,MSBSET | 。 . 2 
あま SCO か GT を R/O」 と コル ソー ル に 表示 . 
O11F C マ RET CPM に 戻る . 
MSBOUT 
O120 OEO9 MVi C,9 3 
he CALL Oo8o5H j 区 字 列 の コン ソー ル へ の 出力 の サブ ルー チン , 
O125 Cg RET 
O126 ODOA445249 MSGDRVi DB ODH, OAH。" DRIVE @" . 
O12F さ A2O5 さ 4554 MSGBSET: DB >』 SET R/0" 。ODH。 OAH。' * | 文字 列 エ リア . 


END 


Figure-2.2.49 ファ ンク ショ ン :28, 25 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


シス テム ・ コ ー ル 徹底 実習 
上 記 ソ ー ス ・ フ ァイル か ら ア セン プリ ・ ソ ツー ス ・ フ ァイル を 作り 、 ア セン プル し 。 “28-25 , COM* 
を 生成 し て 実行 し て み ま し ょ う . 
ファ ンク ショ ン : 28.25 実習 プロ グラ ム の 実行 
当 プ ログ ラム を 実行 する コマ ンド 形式 を 次 に 示し ます . 
28-25J…… だ だ これ だ 人 が 


上 記 コ マン ド を 実行 する こと に より , 現在 の ログ イン ・ デ ィ ス ク が R プ O と な り ま す . 実行 例 を 次 に 
示し ます . 


AA>STAT !) .- 現 在 の ドラ イブ の 状態 を 調べ る . 


人 AsaR/M。 Spacei 119K| 、 っ 、 本 
BrR/M。 Spacei 79K 「A:,B: 共に RW" で ある . 


QA>28-25 ) 実習 プロ グラ ム を 実行 . 
DRIVE As SET R/0 ログ イン ・ デ ィ ス フク の ドラ イブ A : が "R 0" に 設定 され だ . 


注目 . “ログ イン ・ デ ィ ス ク の 取り 出し "の シス テム ・ コ ー ル を 利用 し だ 表示 . 


A>STAT) ドラ イブ の 状態 を 肌 べ る . 
人 Qi R/ ロ 。 SBpaces 119K A : は "RZO“ と な つて いる . 
Bs R/M。 Spacei 79K -:B: は 元 の まま . 


A>DIR TEBT2B。TXT ) … ド ライ ブ A : 上 の ファ イル ^TEST28. TXT* の 存在 を 確認 する .. 
A>TEST2 昌 TXT …… 存 在 し て いる . 


A>ERA_ TEST28.TXT / … ファ イル ^TEST28. TXT" の 削除 を 試み る . 


Bdow Err Dn Az R/ ロ へ C ドラ イブ が ガ が *R_O" の だ め 削 除 で き な い . Ctrl-C を キー イン し , 
ーー リプ ブート し て CPM に 戻す 、 


A>ERA_ TEST2B.TXT/ "再度 削除 を 試み る .! リ ブー ト に より ,“R _O" は キャ ヤン セ ル され て いる . 
>DIR TEST2B.TXT/ - ファ イル "TEST28. TXT” の 存在 を 確 妥 す る . 
NO FILE CtrlC に よる リプ ブー ト に より の , “R 0" が ガリ セツ ト さ れ だ の で , 削除 され て いる . 


合 >Bs ) ログ イン ・ デ ィ ス フク を B : に チェ ンジ . 
B> 人 As 2 日 -25 】 実習 プロ グラ ム を 実行 . 


10 フ 


至 シ ステ ハム ・ コ ー ル 徹 克 解説 


DRIVE Bi SET R/ ロ - ロ グイ ン ・ デ ィ ス ク の ドラ イブ B : ガ "RZO" に 設定 され だ . 
を 注目. * ロ グイ ン - デ ィ ス フ の 取り 出し ? の シス テム ・ コ ー ル を 利用 し だ 表示 . 


B>AsSTAT ) ビラ イブ の 状態 を 調べ る . 
At R/M。 Spaces 12SK ーー リブート に より \R _O/ つ YR ン W" に 戻 つ て いる . 
Bi R/ ロ 0。 Spacei 79K 今回 ^R "0" に 設定 され だ . 


B>^C Ctrl-C に よる リブ ー ト を 行う . 
B>As STAT ) ドラ イブ の 状態 を 調べ る . 


ns R/W。 BSPaces 12 く に テー 


Br R/M。 Spacei 7K ト に より , すべ て の ドラ イブ の *R."O" は キャ ン セ ル さ れる . 


B> 


Figure-2.2.50 ファ ンク ショ ン :28, 25 実習 プロ グラ ム の 実行 . 


ファン クション : eg 


CALL 手 順 
MVI CC。 29…… (1DH) 
CALL 0005H 


生 

((H, L) レジ スタ に , R プ O ド ライ ブ を 示す ベク トル が 格納 され て いる ) 
機能 
ファ ンク ショ ン : 28 の “ディ スク ・ ラ イト ・ プ ロ テ ク ト の セッ ト ” や や , STAT コ マン ド , ある い は BDOS 
に より (例え ば , ディ スケ ッ ト を 交換 し て , リブ ー ト を 行っ て いな い 場 合 な ど ) ライ ト ・ プ ロ テ ク ト 
され た ディ スク ・ ド ライ ブ の ベク トル を 報告 する . 
ベク トル は , ファ ンク ショ ン : 24 の “ログ イン ・ ベ クト ル の 取り 出し ” の 場合 と 同様 の 形式 で , (H, 
L) レジ スタ に 格納 され る . 


実習 プロ グラ ム ファ ンク ショ ン : 29 


ライ ト ・ プ ロ テ ク ト が 付け られ た ディ スク ・ ド ライ プ の ベク トル を 表示 する . | 
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表示 の 形式 は , ファ ンク ショ ン : 24 で 行っ た の と 同様 に , 
26 半 区 区 区 % 沈 各区 交 欧 光 光 光 
1 『 

ドラ イブ ド : ドラ イズ ブ A 

と する . 1” の ビッ ト が ^R プ 0” の ドラ イブ を 示す . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


A>TYPE 29.PRN }) 


START』 
CRLFOUT 復帰 ・ 改 行 を 出力 . 


C。29 リー ドン オン リー ベク トル の 取り 出し "の シス 
OOO5H ! テム コール. 

人 H | に ライ ブ p : | : の ビッ ト 状 態 を 表示 
B1TOUT 3 - 


を る っ 示 
CONOuT | 区 切り の 目 凶 と し て `$” 記 号 を 表示 . 


A。 し 


1 ドラ イブ H : 一 A : の ビッ ツ ト 状 態 を 表示 . 


CRLFOUT 一 復帰 ・ 改 行 を 出力 . 
RET プロ グラ ム 終 了 . CPZM へ 戻る . 


A レ ジス タマ の 内 容 を 0.1 で ビッ ト 表 示す る 
ルチン 。 


O1 さ 2 C9 RET 

CONOUTs 
013 さ FSCSE5 PUSH PSM! PUSH B! PUSH | 
01 さ 6 OEO2 MVI C, 2 ミ ) うー 

E レ ジス タ の アス キー・ コ ー ド を コン ソー ル 

O1S 日 CDOSOO CALL OOOSH | に 出力 する サブ ルー チン 
O1 さ B E1C1F1 POP H! POP B! POP ,!SM | 
O1SE C9 RET 
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全 シ ステ ム ・ コ ー ル 徹 底 解説 


CRLFOUT ェ 
O1SF 1EOD E,ODH 
0141 CD ささ O1 CONOUT ニ ヽ 
QO144 1EOA E。OaH 復帰 ・ 改行 の サ プ ル ー チ ン . 
O146 CD ささ O1 CONDUT 
QO149 C9 


O14A 


> 


Figure-2.2.51 ファ ンク ショ ン :29 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 
上 記 ソ ー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ブル し , “29 . COM” を 生成 
し で 素行 し で み ま し ょ う 。 
ファ ンク ショ ン :29 実習 プロ グラ ム の 実行 


STAT コ マン ド を 使っ て それ ぞ れ の ドラ イブ を “R プ O” に 設定 し , 当 プ ログ ラム で , その 結果 を 調 
2 で み ま し ょ う 。 
当 プ ログ ラム を 実行 する コマ ンド 形式 は 次 の 通り で す . 


29』…… た だ これ だ け . 


実行 例 を 次 に 示し ます . 


>B 1 学 
い と で | 次 の STAT コ マン ド に よる 表示 が , A : , B : 共に レポ ボー ト に さ れる よう に , 例え ば この よう に B : に も アフ セス し て お ぐ . 


A>STAT / 


As R/M。 Spacei 157k | ap ES 
Bs R/W。 8DACei 11 さ k | 初期 状態 の 確認 . この よう に A : , B : 共に RW" で ある . 


nA>29 / … 実習 プロ グラ ム の 実行 . 
OOOOOOOO$OOOOOOOO すべ て 0" で あり ,*R プ 0O" の ドラ イプ は な い . 


A>STAT _Bs=R/D ) STAT コ マン ド で , ドラ イブ B : を "RZO" に 設定 する . 


AA>29 / 実習 プロ ブラム の 実行 . 


OOOOOOOOWOOOOQOO1O 
4 2 番目 (ドラ イブ B : ) が *R^O" と 表示 され だ . 


A>STAT ) STAT コ マン ド で 確認 し て みる . 


シス テム ・ コ ー ル 徹底 実習 


Ai R/M。 Spacei 157k _ CS 0 ED 
Bi R/0。 Bpaces 11Sk ) この よう に , ドラ イブ B : は "R 0" と 表示 され て いる . 


A>BTAT aa=R/ ロ /) - さら に STAT コ マン ド で , ドラ イブ A : も *R _O* に 設定 する . 
A>29 有 7 実習 プロ グラ ム の 実行 . 
O0000000$0000001 1 


ドラ イブ A : , B : 共に "R Z0" と な つ だ . 


Figure-2.2.52 ファンクション:29 実習 プロ グラ ム の 実行 例 . 


求め る ベク トル は , ファ ンク ショ ン : 24 と 同様 の 形式 で , (H, L) レジ スタ に 格納 され て いま す , 


ファ ンク ショ ン : 30… フ ァイル ・ ア トリ ビュ ー ト の セッ ト 


CALL 手 順 
MVI (の 30 の nos (=1EH ) 
(D, E) FCB ア ドレ ス 
CALL 0005H 


間 

(A レ ジス タ に ,。 0。 1, 2。 3 いずれ か の ディ レク トリ ・ コ ー ド , も し く は ファ イル が 

存在 し な い 場 合 , 255 (FFH) が 格納 され て いる ) 
機能 
邊 の チ ァ イル に 。 リー ドッ オシ リー (ER/0) や シス テム (YS) ・ ア トリ ビュ ー ト を も セッ し た 
り , それ ら の リセ ッ ト で ある RW” や “DIR” アトリビュート に リセ ッ ト し た りす る こと が で きる . 
FCB の 1st フ ァイル の エク ステ ンション 用 の 3 バイ ト (t1, t2, t3、 フィ ー ル ド ) の 内 の 2 バイ ト の, 
それ ぞ れ の 最上 位 ビ ッ ト (bit7) の 値 に より , 


t1 の bit7 三 0 の と き “RW” ファ イル 
t1 の bit7 三 1 の と き ^R プ O” ファ イル 
t2 の bit7 三 0 の と き “SYS” ファ イル 
t2 の bit7 ニ 1 の と き “DIR” ファ イル 


と な る (この こと か ら も ファ イル 名 に カナ は 使用 で き な い ). 


人 至 シス テム ・ コ ー ル 徹底 解説 


CALL 終 了 後 , A レ ジス タ に は 0, 1, 2。 3 いずれ か の ディ レク トリ ・ コ ー ド , も し く は 目的 の ファ 
イル が 存在 し な か っ た 場合 , 255 (FFH) が 格納 され る . 


実習 プロ グラ ム ファ ンク ショ ン : 30 


STAT コ マン ド に よる STAT  x : filename . ext $R プ 0J" な どの , ファ イル ・ ア トリ ビュ 
ー ト 設定 機能 に 相当 する プロ グラ ム を 作成 する . 


と りあ え ず 。 通 営 の ファ イル ("RW” で "DIR*) に “R/07/。 また は “SYS” アトリビュート を 
付け る プロ グラ ム の , PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


QA>TYPE 3o.FRN 』/ 


き ニ ビー ニニ ー ド ーー ニー デー こつ ーーー ーー ここ ーー ここ 
# 。 FUNCTIDN 3O』 SET FILE ATTRIBUTES ま 
| 1 
Q1OO URG 1OOH 
OOSC = FCB EQ ロ U OOQOSCH 
START 
Q100 OEO9 MVI C,9 1 ww ー ミ ) 
0102 1148o1 Lx1 D, SBINP 人 S" の キー イン を 促す メッ セー ジ を 
O105 CDOSoo CALL ooo5H | 軸 
KEYINsi 
Oi1oO8 OEO1 MV』 じ 。1 1 ゝ 1 みん SS 
OO 3 68osu | コン ソー ル 入 力 " の シス テム ・ コ ー ル 
O1OD FE52 CFPI 4 | ロッ な らい ヶ 
010ECA ラ 301 F RG : 半 ー 入 力 が ^R" な ら ^SETRO" へ ジャ ンプ . 
O112 FE5 さ CPI は 8 
O114 Ca2CO1 JZ SETSYS | キー 入力 が *S/ な ら \SETSYS" ヘ ジャ ンプ . 
O117 OEO2 MVI 5 タ | 
O119 1E さ に MVI | wo ヶ 三 
O11B CDO5oo CALL ooo5H まっ いら 衝 イ ーー 入力 な ら “?? を 表示 し て , 
Oo11E CSOBO1 JMP KEYIN | 
SETRO 
O121 3a650O LDA FCB+9 
oO124 Fe8O QRI 10ooeooooB | FCB の t1 の bit7 を 1 に セッ トレ し , "FNC80" へ 
O126 さ 265Oo STA FCB+9 ジャ ンプ .*R プ O/ ア トリ ピュ ー ト を セツ ッ ト 
O129 C さ 401 JP FNC さ O する . 
SETSYSs | 
02 SGD に DoS FcB の t2 の bit7 を 1 に セッ トレ し , *FNC30“ へ ミ 
O12F F6BO ORI 100O*OOOOB | ャ ンプ .*SYS* ア トリ ビュ ー ト を セッ ト す る . 
O1 さ 1 さ 2660O STA FCB+1O 
FNC3OI | 
人 NE ・ ア トリ ビュ ー ト の セッ ト ”" の シス 
O136 115COO LXI D,FCB 0 こ 
oO1 さ 9 CDO5OO CALL ooOo5H | 


0 久 紀 


シス テム ・ コ ー ル 徹 克 実習 


O1 さ C FEFF CPI 255 8 
か つ だ . 
O1 さ E CO RNZ A レ ジス タ ガ 255 以 外 な ら , プロ グラ ム 終 了 . CPM へ 戻る . 
O13F OEO9 MVI C,9 ト SU いる 
0141 117901 LXr D, SBERR | る メッ セー ジ を 出力 
0144 CDO5oO CALL OOOSH | 
0147 C9 RET 
O14B ODOA522965 MSGINP』 DB QODH,OAH。"R)ead only or SB)ysmtwm  ? ァ 
O164 20202O494E DB *。 INPUT ( R / S ) >W" 
O179 ODORODOA46 MSBERR』 DB ODH。 OAH。 ODH。 OAH。" FILE NOT FOUND* 。ODH。 OAH。 ODH。 OAH。" を * 


Figure-2.2.53 ファ ンク ショ ン :30 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ブル レ し , “31 . COM” を 生成 
し て 実行 し て み ま し ょ 3). 


ファ ンク ショ ン : 30 実習 プロ グラ ム の 実行 
当 プ ログ ラム を 実行 する コマ ンド 形式 を 次 に 示し ます . 
31ーx : filename . ext』…… この 後 で R ま た は S を キー イン する 。. 


この コマ ンド を 実行 し た 後 , プロ グラ ム の 問い に 答え て , "R プ 0” ファ イル に する な らら ば"R” を 
キー イン 。 "SYSY ファ イル に する な ら ぱ ば “S” を キー イン し ます . 
実行 例 を 次 に 示し ます . 


A>BTAT Bs$*。%/ 実行 前 の ドラ イブ B : 上 の ファ イル の 状態 を 見 て お ぐ . 


Recs Bytes Ext Qcc 
6O Bk 1 R/M Bs BALANCE . CAL 
さ 5 5k KR/M Bs BARRIER. CAL 
ト ア 4 5k R/M Bi BRKEVN. CAL 
1 8 ZN PAINSTALL> 0 フリ 
3 TNBTALL。DAT で R ン w" で *DIRZ ア トリ ビュ ー ト ) 
274 さ 5k R/M Bi INSTALL . HVL 
2 1k R/M Bs INSTALL . SUB 
196 25k R/M Bi SC. CON 
164 21k R/M BsSC. ロ VL 
Bytes Remalining ロ n Bs 11 さ に 


NN ご ロビ ーー ビー 


人 AA>3O_BsSC.CONM 7 B: 上 の ファ イル "SC.COM" に 対し て , 実習 プロ グラ ム を 起動 . 


R)ead only or ら B)ystem ? INPUT ( R / 8 ) >R 


全 シ ステ ハム ・ コ ー ル 徹 底 解説 


YR /ZO" ア トリ ピュ ユート が 付け られ だ . 
QA> さ O_BI SC.UDVL / 同様 に も う 1 つの ファ イル "SC. OVL" に 対し て 実習 プロ グラ ム を 起動 , 


R)ead only or S)ystem ? INPUT (R /S) 28 今度 は "SYS" に すず る. 


*SYS" ア トリ ビュ ユー ト が 付け られ だ . 
>STAT Bi:*。 キ / "結果 を 健 有 認 する . 実行 前 の 表示 と 比較 . 


Recs Bytms Ext Acc 

60O Bk R/M BBALANCE . CAL 

3 る 5 Sk R/M B:BQARRIER.CAL 

ト ィ 4 5k R/M Bi BRKEVN . CaL 

98 1 さ に R/M Bs INSTALL . CON 

116 15k R/M Bs INSTALL 。 DQT 

274 さ 5k R/M Bi INSTALL . DVL 

2 1k R/M Bs INSTQLL . SUB 

164 21k R/M Bs(SC.。DVL) (に 注目 . *SYS" ア トリ ビュ ユー ト は *〈 )“ で 示さ れる . 

196 25k Bi SC、COM RZO" に 注目 . 
Bytes Remaining Un Bi 11 ミ k 


い Dー ロ ヒビ ビー ビー ビー デビ 


N 
つづ 
こ 
=」 


A>DIR Bs) ディ レフ トリ を 見 る . 
Bi SC COM 』 INSTALL COM : INSTALL DAT 』 INSTALL ロ VL 
Bs BALANCE CAL 』 BARRIER CAL 』k BRKEVN CAL 』 INSTALL SUB 


A> シス テム ・ ア トリ ビュ ユー ト の 付い た ファ イル "SC.OVL” が 表示 され て いな いこ と に 注目 . 


Figure-2.2.54 "ファンクション:30 実習 プロ グラ ム の 実行 . 


当 プ ログ ラム は , “R ブ 0 と “SYS? アト リピ ビュー ト を 付け る の み で す が , これ ら を リセ ッ ト す る 
機能 も , 同様 に 簡単 に 追加 で きま す . 各自 で 試み て 下さ い . 


CALL 手 順 
MVI C, 31…… (=1FH) 
CALL 0005H 
音 
((H,。 上 L) レジ スタ に ディ スク ・ パ ラメ ー タ ・ プ ロッ ク の ベー ス ・ ア ドレ ス が 格納 され て 
いる ) 


シス テム ・ コ ー ル 徹 克 実 習 


機能 

BIOS 先 頭 の "JUMP ベク トル に 続く 、 ディ スク ・ パ ラメ ー タ 定義 部 の ディ スク ・ パ ラメ ー タ ・ 
プ ブロック (15 バ イト ) の ベー ス ・ ア ドレ ス を 求め , (H, し 上 ) レジ スタ に 格納 する . 

ユー ザー・ プ ログ ラム に お いて , ディ スク の 全容 量 , トラ ッ ク 数 , セク タ 数 , 最大 ディ レク トリ 数 , 

その 他 の ディ スク 諸 元 を 調べ た り , この 15 バ イト の 値 を 変更 し て , 例え ば 1 つの ドラ イブ を 片面 使用 
ご 両面 使用 を BIOS 上 で 自由 に 切り 替 えて 使う 場合 な ど に 利用 され る (1.1.2- 3 章 参 照 ). 


実習 プロ グラ ム ファ ンク ショ ン : 31 


ディ スク ・ パ ラメ ー タ ・ プ ロッ ク の 15 バ イト を ダン プ す る 。 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


>TYPE さ 1.PRN』 


。 さ 1 」' デ マス フク. パラ メー マタ. アド レス の 取り 出し * の 
oOQo5H | ジス テム - コ ー ル . H, ヒレ ジス タ に , その ペー 
ス ・ ア ドレ ス が 取り 出さ れる . 


B。 15 15 バイ ト 分 ダマ ンプ する カウ ンタ を セッ ト . 


A。M | 5 
HEXDSBPLY | 1 パイ ト の ダン プ . 


し ポイ ンタ を 1 つ 進 め , 次 の パイ ト の ダン 


誠 
B ウラ 宮 バイ ト 出 力 し 絶 わ つた だら , 次 の *RET* 
C2o7O1 LooP | へ 


C9 RET プロ グラ ム 終 了 . CPM へ 戻る . 


HEXDSPLYs 
F5 PUSH PSM 
OFOFOFOF RRC! RRC! RRC! RRC 
CD1FO1 CALL HOUT 1 
陸 1 Ph A レ ジス タ の 和仁 を 16 進 で コン ソー ル に 表示 
に ン ソ ー ル に 
yy 3 Net i する サ プ ブルー チ ン . 
FE さ A CPr さ QH 
DA2AO1 り ビ HOUT2 
C607 AD1 7 
CD2EO1 HUDUT2』 CALL CONOUT 
C9 RET 


全 シ ステ ム ・ コ ー ル 徹底 解説 


CUNOUT 』 
O12E CSE5 PUSH B! FUSH H | 
を て 人 hs に y ま A レ ジス タ の アス キー・ コ ー ド を , コン ソー ル 
に 出力 する サブ ルー チン 
O133 CDOS5oQ CaLL OOO5H 
O1 さ 6 E1C1 PP H! POP B 
O13B ヒ 9 RET 
O1 さ 9 END 


人 > 


Figure-2.2.55 ファ ンク ショ ン :31 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト 
上 記 ソ ー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ブル し , “31 . COM” を 生成 
し て 夷 村 し て み ま し ょ う 。 
ファ ンク ショ ン : 31 実習 プロ グラ ム の 実行 
当 プ ログ ラム を 実行 する コマ ンド 形式 は 単純 で , 
31 す …… た だ これ だ け 。 


と キー イン する だ け で , 現在 ログ イン し て いる ドラ イプ の ディ スク ・ パ ラメ ー タ ・ プ ロック の 15 バ イ 
ト が ダン プ さ れ ま す . 
実行 例 と し て , 8 イン ナチ 標準 ディ スク の 場合 と NEC PC-8001 CPM (1W) の 場合 を 次 に 示し ます . 


8 イン チ 標 準 デ ィ ス フ の 場合 の 実行 例 . 


1Q OO Q さ OZ7 OO F2 OO SF OO CO OO 10 QO 02 QO 


人 > 


Figure-2.2.56 ファ ンク ショ ン :31 実習 プロ グラ ム の 実行 . 8 イン チ 標 準 デ ィ ス ク の 場合 . 


仙 > さ 1 7 PC-8001 CPZMC1W) の 場合 の 実行 位 . 
2o oo o さ oz7 oo gs oo sF oo Co oo no oo o2 oo 


人 > 


Figure-2.2.57 同上 . PC-8001 CPM (1W) の 場合 . 


l 隊 見 =) 


シス テム ・ コ ー ル 徹底 実習 


参考 の た め に , この 2 種類 の CPM の BIOS の PRN フ ァイル か ら , デイ スク ・ パ ラメ ー タ ・ プ ロッ 
ク の 部 分 を タイ プア ウト し て 次 に 示し ます . 


A>TYPE CBIOS.PRN ) 8 イン チ 標 準 デ ィ ス フ の BIOS の ディ スク フ ・ パ ラメ ー タ ・ プ ロッ フ を タイ プア ウト する . 


3DISK PARAMETER BLDCK。 COMMON TO ALL DISKS 
SECTORB PER TRACK 
3 BLDCK SHIFT FACTOR 
3 BLDCK MABK 
3 NULL MASK 
#DISK SI1ZE-1 
DIRECTORY MAX 
ALLOC O 
35ALLOC 1 
3 CHECK 81ZE 
3 TRACK OFFBET 


3 
) この 15 バ イト が 実習 プロ グラ ム に より ダン プ さ れる . 


Figure-2.2.58 実際 の BIOS の ディ スク ・ パ ラメ ー タ ・ プ ロッ ク 部 の タイ プア ウト . 8 イン チ 標 準 デ ィ ス 
ク の 場合 . 


A>TYPE PCBIOBS6。PRN) PC-8001 CP MC1W) の BIOS の ディ スク ・ パ ラメ ー タ ・ プ ロッ フク を タイ プア ウト する. 


3 すす 311111 す 111111163113131113161111131 
* ネ ネネ DISK PARAMETER DEFINITIUN *#* 
11111113 す 31111 す 33 すす 1113 も 13131313331 


EQU 生 35BASE ロ F DISK PARAMETER BLOCKS 
Dw XLTO。 OOOOH 3TRQANSLATE TABLE 


#DISK PARNM BLUCK 
#SEC PER TRACK 
5 BLUCK SHIFT 
sBLUCK MASK 
#EXTNT MASK 
DISK SI1ZE-1 
DIRECTORY MAX 
8 ALLOCO 
5QLLOUC1 

#CHECK SIZE 
30FFSET 


キ 


ご の 15 バ イト が 実習 プロ グラ ム に より ダン プ さ れる . 


Figure-2.2.59 同上. PC-8001 CPM (1W) の 場合 . 


至 シス テハ ・ コ ー ル 徹底 解説 


ファ ンク ショ ン : 32… ユ ー ザ ー・ コ ー ド の セッ トン 取り 出し 


CALL 手 順 
MYI や 。、 ーー" (20H) 
セッ ト の 場合 (E) ユー ザー・ コ ー ド (0 15) 
CALL 0005H 
MVI C, 32 
取り 出し の 場合 (E) て OFFH 
CALL 0005H 
機能 


任意 の ユー ザー・ エ リア へ 移行 する . また は , 現在 の ユー ザー・ エ リア の No を 報告 する . 

前 者 の "セット" の 場合 は 、E レ ジス タ に 任意 の ユー ザーNo( 0 一 15) を セッ ト し て CALL を 行う . 後 
者 の "取り 出し "の 場合 は 、E レ ジス タ に FFH を セッ ト し て CALL を 行う . 結果 は A レ ジス タ に 0 一 15 
の 値 と し て 取り 出さ れる . 


実習 プロ グラ ム ファ ンク ショ ン : 32 


ユー ザー・ エ リア を 変更 する USER” コ マン ド と , 現在 の ユー ザー・ エ リア な ど を 報告 する "STAT 
USR : ” コマ ンド の 一 部 に 相当 する プロ グラ ム を 作成 する . 
機能 は 2 つ で ある が , プロ グラ ム は 一 本 に まとめ る . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 決 に 示し ます . 


nA>TYPE 32。.PRN 』 


118 


シス テム ・ コ ー ル 徹底 実習 


SASDOO FCB+1 | 当 プ ログ ラム の 実行 時 に , コ マン ド ・ ラ イン の 
47 BA パラ メー タ が ある か ガ ど うみ の チ ェ ッ ク . パラ 
FE2O | メー タ が な けれ ば ,*GETUSER“ へ ジ ヤ ン プ . 
CA2201 GerTUWeh 

さ ASEOO FCB+2 | パラ メー は あつ だ が , それ は 2 桁 で ある か ど 


FE2O 上 ジン 1 桁 の 場合 は SBYTE" へ ジャ 
CA1CO1 SBYTE ] ラテ 


Ps 111B 績 の ASCl 力 を 0FH ま で の HEX 形 式 に 変 


ド ュー ー ザ ー・ コ ー ド の セッ ト * の シス テム ・ コ ー 


新しい ユー ザー・ エリ ア に 生 し だ 和 。 プロ グ 
ラム を 終了 し て CPM へ 戻る 
SBYTEs 


| 1 居 の ASC を HEX 形 式 に 変換 し 。 
| *FNC32" ヘ へ ジャ ンプ . 


GETUSER* 
ネー に に に で の 
E。 OFFH | * ユ に ・ コ ー ド の 取り 出し “の シス テム 
OOoO5H es 


HEXDSPLY 取り 出し た 値 を 表示 . 
RET -- プ ログ ラム を 終了 し て CP.^M に 戻る . 


HEXDSPLYs 
PUSH PSM 
RRC! RRC! RRC! RRC 
CALL HOUT 1 
POP PSM 
ANI OFH 0 ジス 5 短 10 進 で 表示 する 
ADI さ OH サブ ルー 
CPi AH 
JC HOUT2 
ADI LA 
CALL CO ロ NOUT 
RET 


7 A レ ジス の アス キー コー ド を コン ソー ル 
ロ ご 表示 > 
CALL O009H に 表示 する サブ ルー チン . 


RET 
END 


Figure-2.2.60 ファンクション:32 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


全 シ ステ ハム ・ コ ー ル 徹底 解説 


ファ ンク ショ ン :32 実習 プロ グラ ム の 実行 
当 プ ログ ラム を 実行 する コマ ンド 形式 を 次 に 示し ます . 


32 ガ 0 …… 現在 の ユー ザーNo を 調べ る 場合 
32 nn リー ユー ザー・ エ リア n を 移行 する 場合 . 


実行 例 と し て , ユー ザー・ エ リア (7) に , ファ イル を コピ ー す る 例 を 示し ます . 参考 と し て “USER? 
ョ マッド 。 *STAT* コマ ンド も 使っ て あり まず すず. 


A>STAT UBSRs ) 現状 の 確認 を し て お ぐ . 


QActive User 』 O 
Active Filesi O 1 npM の コー ザー- エ リア に ファ イル は な い . 


A>32 ) …- 実習 プロ グラ ム の 実行 (取り 出し ). 
OO -…- 現 在 の ユー ザー・ エ リア は 0 で ある . 上 の 結果 と 同じ . 


A>DDT PIP。COMN ) 人 他 の ユー ザー・ エ リア に ファ イル を コピ ー す る だ め に , まず DDT で *PIP. COM” を ロー ド . 
DDT VERS 2.2 

NEXT PC 

1EOO O1oo 

ー^C …… リ ブー ト し て CPM に 戻る. 


A>UBER 7 ) コー ザー- エ リア 7^ ム 移行 . 
A>SAVE 29 PIP.COM ) その エリ ア に *PIP . COM” を セー プ , 


A>USER_O ) --- コ ー ザ ー・ エ リア を 0 に 戻す . 


QA>STAT USRs )  …- 現状 の 確認 . 


Active Usmer 』 O ユー ザー・ エ リア は 0. 
RActive Filess O7 ア ーー ユー ザー・ エ リア 0 と 7 に ファ イル が 存在 する . 


人 AA>S2 7/ 実習 プロ グラ ム に より , ユー ザー・ エ リア 7 へ 移行. 


人 A>DIR ) その エリ ア の ディ レフ トリ を 見 る . 
ns PIP CD 先ほど SAVE し た *PIP. COM" の み 存 在 する . 


>PIP の Q』= さ 2.COMEBO] ) ーー PIP パ ラメ ー タ CG0) を 使 つ て, 当 プ ログ ラム *32. COM” を 
ユー ザー・ エ リア 0 っ 7 に コピ ー す る 、 


A>DIR) その 人 古 認 
na PIP COM 』 32 CON 32.COM" ガ コピ ー さ れ て いる . 
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この エリ ア に コピ ー さ れ だ 実習 プロ グラ ム に より . 現在 の ユー ザー・ エ リア を 調べ る . 
当 徐 で は ある が , エリ ア 7 で ある . 


OO …… ユ ー ザ ー・ エ リア 0 に 戻 つ て いる . 
仙 > 


Figure-2.2.601 ファ ンク ショ ン :32 実習 プロ グラ ム の 実行 . 


CALL 手 順 
MVI  C。33…… (=21H) 
(D, E) FCB ア ドレ ス 
CALL 0005H 
葬 
(読み 出し が , 正常 に 行わ れ た 場合 は , A レ ジス タ に は 00 が , 正常 で な い 場 合 は 01-06 
の エラ ー・ コ ー ド が 格納 され て いる ) 


機能 

(D, E) レ ジス タ で アド レス され る FCB で 示さ れる ファ イル を , FCB の r0, r1 フ ィ ー ル ド に セッ ト き さき 
れ て いる レコ ー ド 番号 に 従っ て , ラン ダム に 読み 出す . 読み 出さ れ た レコ ー ド (128 バ イト ) は , DMA 
バッ ファ に 格納 され る . シー ケン シャ ル ・ リ ー ド の 場合 と 異な り , レコ ー ド 番号 の 自動 イン クメン ト 
は 行わ れ な い . 

レコ ー ド 番号 は 2 バイ ト の 値 で あり , LSB は r0, MSB は r1 に セッ ト す る . フィ ー ル ド r2 に は , 最初 に 
00 を セッ ト し て お く . 

当 フ ァ ン クシ ョ ン を CALL す る に は , まず , 目的 の ファ イル を オー プン し , r2 に 00 (最初 の み ) r0, r1 
に は 読み 出 そ う と する レコ ー ド 番号 を セッ ト し て か ら 行 う . 

読み 出し が 正常 に 行わ れ た 場合 .A レ ジス タ に は 00 が 格納 され , 正常 に 行わ れ な か っ た 場合 は , 01-06 
の エラ ー・ コ ー ド が 格納 され る . エラ ー・ コ ー ド の 意味 を 次 に 示す . 
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UER9ss 正常 な 読み 出し . 

01…… デ ィ レ クト リ 上 に 登録 きれ て いな い プ ロッ ク や ロジ カル ・ エ クス テン ト か ら 読 み 出 そ う 
と し た 場合 . 

0 ラン ダム ・ モ ー ド に な ら な い 場 合 . 

03…… 現 在 の ロジ カル ・ エ クス テン ト を クロ ー ズ で き な い 場合 

04…… 登 録 さ きれ て いな い ロ ジ カ ル ・ エ クス テン ト ヘ シー ク し た 場合 . 

05…… 読 み 出 し モー ド に な ら な い 場 合 . 

06…… フ ィ ジ カル な ディ スク の 最終 を 超え て シー ク し よう と し た 場合 (r2 が 00 で な い 場 合 に 発生 
する ). 


実習 プロ グラ ム ファ ンク ショ ン : 33 


ラン ダム ・ リ ー ド を 行う プロ グラ ム を 作成 する . 


ここ で は , 「 ラ ンダ ム ・ リ ー ド が で きる 」 こ と の 基本 的 な 実習 が 目的 な の で , な る べく 理解 し 易 
いよ うに, 炊 項 の 「 ラ ンダ ム な 書き 込み 」 で の 実習 プロ グラ ム と 同じ く , アド レス 4000H に あら 
か じ め 格 納 し て お いた レコ ー ド 番号 表 に 従っ て , ラン ダム ・ リ ー ド が 行わ れる プロ グラ ム を 作 
成す る . リー ド さ れ た レコ ー ド は , 順次 コン ソー ル に 出力 され て 行く . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


AA>TYPE ささ .PRN / 


#』 。 FUNCTIDN ささ 』 READ RANDQNM 1 

ーーーーーーー ニ ーーーーーー デ マニー ニー ニー ニー ニラ ーー 日 
O1OO DRG 1OOH 
oo5C = FCB EQU oo5CH 

BTARTs 
O1OO 21004O LXI H。 4OOOH | 次 に 読み 出す べき レコ ー ド No. が 拉 二 され て いる 宛 ドレ ス 
0103 228BO1 SHLD BETADR 「 指し 示す ポイ ンタ に , 初期 値 4000H を スト ア . 
O106 OEOF MVI CS 
O1O0B 115COO LXI D,。FCB ! コマ ンド ・ ラ イン に 記述 され だ ファ イル の オー プン . 
otoB CDo5oo CALL ooosH 
O1OE FEFF 0 CPr 255 te We 
ーー こ に | 自 S の ファ イル が な い 坦 合 は *ERROR” へ ジャ ンプ . 
O11 さ aF XRA A NM い 
O114 327FoO STA PCB+35 | 2" フィー ルド に 00 を セッ ト . 
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NXTRECs 
O117 28BBO1 LHLD GETADR 
O11A 7E Mnv A。M 
Fw て 0 。COVr1* ビ レコ ー ド No. の テー ブル カ ら の レコ ー ド No。 を セ ゼット. 
O11F 7E MOV Aa, NM 
O12O さ 27EOO STA FCB+ さ 4 
O123 FEFF CPI OFFH | い r1 ガ FFH な ら ば , プロ グラ ム を 終了 . 
oO125 CaOOQO JZ OoooH  「 リ ブー ト し て CPM に 戻る . 
O128B 2< INX H | 次 の レコ ー ド No. の 格 約 さ れ て いる アド レス 
O129 228BO1 BHLD GETADR | を , ポイ ンマ に セッ ト . 
O12C OE21 MVvi WS CM 
oO12E 115Coo LXr D。FCB "ランダム 策 み 出し * の シス テム ・ コ ー ル 
O1 さ 1 CDO5oo CALL ooo5H 
0O134 B7 DRA A | 正常 な 腕 み 出し が 行わ れ な い 楊 合 は , 
O135 C27101 JNZ ERROR ERROR" へ ヘ ジ ヤ ンプ . 
ー…H,L ヒ レジ スタ に , DMA パ バッ ファ の 先頭 アド 
oO1SB 21BOOO Lxr Hzoogoh は レレ ジス 
DISPs 
O1SB 7E NMQ ソ A。H ] 
O13C CDS5oO1 CALL HEXDSPLY 
46 2 ドレ ス 80HーFFh の 12801 イ ト の 内 を 
* ツン ソ ー ル へ い N 
4 : ケ お 1 0 コン ソー ル ヘ タイプ ・ ア ウト す 
O141 BZ QRA A 
O142 C2SBO1 JNZ DISP 
O145 OEoy MV ビ 。9, | 
O147 118B6O1 LXI D。RSGCRLF | 復帰 ・ 改 行 の 出力 . 
O14A CDO5Oo CALL ooosH 
O14D CS1701 JMP NXTREC 次 の レコ ー ド の 鞍 み 出 レ ヘ ルー プ . 
HEXDBPLYI 
O15O F5 PUSH PSM 
O151 OFOFOFOF RRC ! RRC! RRC! RRC 
O155 CDS9O1 CALL HOUT1 
O158 F1 PP PSM 
O159 E6OF HOUT1』 ANI OFH いい 
O1SB Ce6 さ O ADI さ OH 2 16 進 で 表示 する 
0O15D FE さ A CPI さ AH・ 
O1S5F DA6401 JC HOUT2 
O162 C607 ADI 7 
O164 CD6BO1 HOUT2』 CALL CONOUT 
O167 C9 RET 
CONOUTs 
oO168 ES PUSH  H 
O169 OEO2 MVI Fr2 そる 
O16B SF NOV 。E。A | A レ ジス タ の アス キー・: コ ー ド を コン ソー ル 
oO1eC CDo5oo CALL ooosh | に 出力 する サブ ルー チン . 
O16F E1 POP H 
O17O C9 RET 


123 


全 シ ステ ハム ・ コ ー ル 徹底 解説 


O171 OEQOS MVIi C。9 | 


O17 さ 117AO1 し Xi D。MBSGERR エラー・ メ ッ セ ー ジ の 出力 サブルーチン . 
O176 CDOSOQ CALL OoO5H ] 
O179 C9 RET 


O17A ODOA455S252 MSGERR』 DB OQDH, OAH。 "ERROR !" 。ODH, OAH。" も? 
O186 ODOAODOA24 MSGCRLF』 DB ODH, QAH, ODH, ORH。" ま * 


O18B BETADR』 DS 2 
O18D END 


仙 > 


Figure-2.2.62 ファ ンク ショ ン :33 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ツー ス ・ リ スト か ら ア セ シ プ リ ・ ツ ソー ス ・ フ ァイル を 作り 9。 ア セン プル し 。 "33 。 COM” を 生成 
し て 守 和 且 し て みみ まし ょ う 。 


ファ ンク ショ ン : 33 実習 プロ グラ ム の 実行 


当 プ ログ ラム を 実行 する 前 に , まず , ラン ダム ・ リ ー ド を 行う た め の レ コー ド 番 号 表 を , アド レス 
4000H か ら の エリ ア に ロー ド し て お きま す . 

レコ ー ド 番号 表 が ロー ド で きた ら , 当 プ ログ ラム を 実行 し ます . 実行 する コマ ンド 形式 を 次 に 示し 
ます . 


33..X : filename . ext 』…… ドラ イブ x : 上 の ファ イル filename . ext′ を , アド レス 4000 
から の レコ ー ド 番号 表 に 従っ て ラン ダム ・ リ ー ド し , タイ プア ウ 
ト す る . 


実行 例 と し て , 次 項 で 解説 する ファ ンク ショ ン : 34「 ラ ンダ ム な 書き 込み 」 で の 実習 で 作成 し た ラ 
ジグ ムッ ファ イル "DEBST 、RNDY を 。 読 な 出し で 。 コジ ジール に タイ プア ウト し て み ま し ょ う ( 先 
に 次 項 を 実習 し て 下さ い ). 

読み 出す 順序 は , 書き 込み を 行っ た ラン ダム ・ レ コー ド と 同じ 順序 で (アド レス 4000H か ら の 内 容 ) 
で 行い ます の で 。 タイ プア ウト は , 00, 01,。 …… 0C の 順に , 128 バ イト ずつ 行わ れる は ず で す . 

この 実行 例 を 次 に 示し ます . 
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A> do ラン ダム ・ レ コー ド No. の テー ブル を ロー ド (〈RND. HEX に つい て は , 
DDT VERS 2。2 次 項 の ファ ンク ショ ン : 34 を 参照 ). 

NEXT FC 

4O1C OOOO 一 - 当 プロ プラ ム で は , ラン ダム ・ レ コー ド No. の テー ブル は 4000Hー に 設定 し て ある . 
= へ ーー DDT を 終わ る . 


A>DIR Bl/ 読み 出 そ う と し て いる ファ イル の 確認 . 
Bi TEST RND 


A> き さ BI TEST。RND / 
OOOOOOOQOOOOOOOOOQOOOOOOOOOOOOQOQOOQOQOOQOQOQOOOOOOQOOOQOOOOOQOQOOOOOOQOQOOQOQOOOOOOOOOOQOOQOQOQOQQ 
OOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOQO 


OOOQOOOOOOOOOOOOOOOOOOOOOOOQOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOQOOOOOOOOOOOOO 
OOOOOOOOO0000000 


01010101010101010101010101010101010101010101010101010101010101010101010101010101 
0101010101010101010101010101O101010101010101010101010101O1O1010101O1010101010101 


O1O1O101O1010101O101010101O1O1O1O1O101O1O1O101O1O101O101O1O1O1O1O1O1O101O01O1O101 
O1O1O1O1O1O1O101 


O2O20202O2O2O202O2O2O2O2O2O2O2O2020202O2O2Q2O2O02O2O202O020202O20202O202O2O2O2O202 
O202O02O202O202O2020202O202O02O2O2020202020202020202020202020202020202020202020202 
02020202020202020202020202020202020202020202020202020202020202020202020202020202 
O202020202020202 


O さ O さ O さ O さ SO さ OSOQ30O さ O さ OSO さ O 〇 さ O さ 〇 さ O さ O さ O さ O さ O 〇 O さ O 〇 O さ O さ 〇 さ 〇 さ 〇 さ O 〇 さ O 〇 さ O さ 〇 さ O 〇 さ O さ O さ O さ O さ O さ O さ O さ 0O さ 030 さ 0 さ 
〇 さ O3O 〇 O さ O 〇 O さ 〇 3 〇 くさ 〇 O さ O 〇 さる O さ O さ 〇 さ 〇 さ 〇 O さ O 〇 O さ 〇 3 さ 〇 さ O 〇 O さ 〇 さ 〇 さ O さ 〇 さ 〇 O さ 〇 3O 〇 さ O 〇 3 さ O さ 〇 さ 3 〇 さ 〇 さ 〇 さ 〇 さ 〇 3 〇 O さ O 〇 O さ 〇 さ O 〇 O さ O さ O さ 3O さ OS 
O 〇 さ O 〇 さ Q 〇 さ O さ O さ 〇 さ O 〇 さ O 〇 さ O 〇 O さ O さ O さ O 〇 O さ O 〇 さ 〇 さ 〇 O さ O 〇 さ 〇 さ 〇 さ 〇 O さ O さ 〇 さ 〇 さ O さ O 〇 さ O 〇 O さ O 〇 O さ 〇 さ O 〇 さ O さ 〇 さ O 〇 SO 〇 さ O 〇 さ O 〇 さ O さ O 〇 Q さ O さ Q さ O さ 0Q さ 
O 〇 O さ O さ O さ O さ O さ O さ O さ O さ 


O40404O4O40404Q40404O40404O40404O4O404O4O4O404O4O404O4O0404O4O404O4O40404O4040404 
O404040404040404040404040404O40404O404O4O4O40404O04O4040404O40404O04040404040404O04 
O404040404040404040404040404040404040404O40404040404040404040404O404040404040404 
O404040404040404 


OSo き 05OSOSO5O5OSO505OSO5OSQOSO5OSOSo5O5OSOSoO5O5OSOSO5SOSOSOSOSOSOSOSO5OSOSOSOSOSO5 
OS5O5O5SO5O5O5O5O5O5O5O5O5O5O5SO5SO5O5O5SO5SOSOSOSOSO5O5O5O5SO5SO5SO5OSO5O5OSO5OSO5SO5O5O5 
OSoSO5O5O5O5O5SOSOSO5O5SO5SOSO5OSO5SO5O5OSO5SOSQSOSO5OSOSOSoSOSoSQS5OSOSOSOSOSOSOSO505 
OSOSO5SQSOSOSO5O5 


O6O60Q6O6O6O6060606060606OQ60606O6O60606O6O6060606O6O60606O6O6O6O6O6O6O60606060606 
O606060606060606O60606060606060606O606060606O6O606060606060606060606O60606060606 
O606060606O606060606060606O6O606O6060606060606O6060606O6060606060606060606060606 
O606060606060606 


O7O707O7070707070707070707O70707070707O7O70707O7O7O7O7O7O7O70707O707O7O7O707O0707 
O7O707O7O7O7O7O7O707O7O7O7O7O7O7O7O707O707O707O7O7O70707O7O7O7O7O7O7O7O7O70707OZ 
O707O70707070707O70707O707070707O70707O7O7O7O7O7070707070707070707070707O7070707 
O707070707070707 


QBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBO 昌 
OBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOB 
OBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOB 
OBOBOBOBOBOBOBOB 


O9O9090909O9O90909090909O909090909090909O9090909O909O9O9O9O9O9O9O9O9O9O9O9O90909 
0909090909090909O09O909O09O9O90909090909090909O90909090909090909O9O9090909090909O59 
O9O9090909O090909090909090909090909090909090909O9O9O909O9090909090909090909090909 
0909090909090909 


125 


全 シ ステ ハム ・ コ ー ル 徹底 解説 


OAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAQAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOROAOAOAOA 
OAOAOAOAOAOAOAOROAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOROAOAOROAOAOAOAOAOA 
QAQOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOAOROAOAOAOAOA 
OAOAOAOAOAOAOAOA 


QBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOB 
OBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOB 


OBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOBOB 
OBOBOBOBOBOBOBOB 


QOCOCOCOEOEOCOCOCOCOCOCOEOCOCOCOCOCOCOCOCOCOCOCOCOCOEOEOEOEOEOCOEOCOEOCOCOCOCOCOC 
OCOCOCOCOCOCOCOEOEOCOCOCOCOCOEOCOCOCOEOEOCOEOCOCOCOCOCOCOCOCOCOCOEOCOCOEOCOEOCOC 


QCOCOCOEOEOCOCOCOCOCOCOCOEOCOCOCOCOCOCOEOCOCOCOCOCOCOEOECOCOEOEOCOCOCOEOCOCOCOCOC 
OCOCOCOCOCOCEQOCOC 


次 項 で 行っ を ラン ダム な 書き 込み と 同じ 順序 で 難 レ コー に ビ が 読み 出さ ね て いる こと が , 00 一 0C 
の 順序 ガ ら 分 か る . 


Figure-2.2.63 ファ ンク ショ ン :33 実習 プロ グラ ム の 実行. 


ファ ンク ショ ン : 34… ラ ンダ ム な 書き 込み 


CALL 手 順 
MVI C。 3 (22H) 
(DE) と PCB ア ドレ え 
CALL 0005H 


峡 
(書き 込み が 正常 に 行わ れ た 場合 は , A レ ジス タ に 00 が , 正常 で な い 場 合 は , 01 一 06 の エ 
ラー・ コ ー ド が 格納 され て いる ) 
機能 
DMA バ ッ フ ァ (デフ ォ ー ル ト は , 80HーFFH) の 内 容 を FCB の r0,r1 フ ィ ー ル ド に セッ ト さ れ て いる 
ディ スク 上 の レコ ー ド 番号 に 書き 込む . 
詳細 は , 読み出し” が “書き 込み / と な る だ け で , 前 項 の ファ ンク ショ ン : 33「 ラ ンダ ム な 読み 出し 」 
と 同様 で ある . 前 項 を 参照 . 
た だ し , エラ ー・ コ ー ド 05 の み は 意 味 が 異な り , ディ レク トリ が フル と な っ て , これ 以上 新しい ロジ 
カル ・ エ クス テン ト を 作る こと が で き な い こと を 示す . 
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シス テム ハム ・ コ ー ル 徹底 実習 
実習 プロ グラ ム ファ ンク ショ ン : 34 


ーーー 
ラン ダム ・ ア クセ ス の 基本 動作 を 理解 する た め に , ラン ダム な 任意 の レコ ー ド 番号 に デー タ を 
書き 込ん で 行き ほ , ラン ダム ・ フ ァイル を 作成 する プロ グラ ム を 作成 する . 
分 か り 易 くす る た め に , ラン ダム な 任意 の レコ ー ド 番号 は , アク セス する 順に , アド レス 4000 
H か ら の エリ ア に 事前 に ロー ド し て お く . この レコ ー ド 番号 表 は , 当 プ ログ ラム で は , 何 の 意 味 
も な い 適 当 な レコ ー ド 番号 を 並べ て お くだ け で ある が , 本 来 の ラン ダム ・ ア クセ ス を 利用 し た 
プロ グラ ム で は , 例え ば 住所 録 や , ワー ド プ ロ セ ッ サ の “辞書 " な どの 検索 の た め の “ リ ファ 
レン ス ・ テ ー ブ プ ブル“ (対応 表 ) で ある . 
まず , この レコ ー ド 番号 を 並べ た テー ブル を 作る . DDT の S コマ ンド で , 直接 書き 込ん で 行っ 
て も 良い が , 見 て 分 か り 易 いよ うに , エディ タ と アセ ンプ ブラ を 使っ て ラン ダム な レコ ー ド 番号 
を 作成 し た . 


ファ イル 名 を ^RND . ASM” と し て アセ ンプ ブル し , で きた “RND . HEX” を DDT を 使っ て 4000H 
に ロー ド し ます (ORG が 4000H と し て ある の で , 自動 的 に 4000H か ら ロ ー ド され る ). “RND. ASMY 
を アセ ンプ ブル し て で きた PRN フ ァイル “RND. PRN” を 次 に 示し ます . 


nA>TYPE _RND.PRN ! 


4000H -…-DDT で , アド レス 4000H か ら ロ ー ド され る よう に , 
ORG は 4000H と し て お ぐ . 

oo*ooh 

Oowo1h 

OO*O2h 


=- この , 台 計 13 レ 
コー ド に の ラン ダム な DW 
レコ ー ド 番号 を , ア DW 
ドレ ス 4000H か ら の DW 
エリ ア に ロー ド し て 
お ぐ . 


O1$ 人 6h 
01 を ASh 
O1 %47h 


8 尽 ミ き 


MI 


ンー- 例え ば これ は , レコ ー ド 番号 218H(1( 雄 で 536) を 表す . 


に 
レ 
1 
5 
No. 
を 
並 
ペ 
て 
行 
に 


Sg SS 品 


Du 
DuM 
Du 
DM 
DM 
D ぃ 
DM 
Du 


OFF@FFh - キ --- テ ー ブ ル の 終わ り を 示す . 
この 値 を それ ぞ れ の レコ ー ド 番号 に 書き 込 も うと する . 


キネ 


1 
と コ 


Figure-2.2.604 ラン ダム ・ レ コー ド 表 を 作る ゐる ため の アセ ンプ リ ・ ソ ー ス ・ フ ァイル . 


人 グ 


至 シ ステ ム ・ コ ー ル 徹底 解説 


プロ グラ ム は , ア ドレ ス 4000H か ら ロ ー ド され る この ラン ダム な レコ ー ド 番号 の 順に ディ スク を アク 
セス し , DAM バ ッ フ ァ 上 の 128 バ イト の デー タ を 書き 込ん で 行き ます . 書き 込む ゲー タ は , 結果 の 確 
認 が し 易い よう に 1 レコ ー ド , オー ル 00 か ら 始 まり , 1 レコ ー ド ご と に 01, 02、03 と イン クリ メン ト 
し て 行き ます . 1 レコ ー ド の 128 バ イト は , すべ て 同じ 値 で す . 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


>TYPE さ 4.PRN / 


ーー テニ ーーー ニ ーーー コー エー ニー ニー ビニ ー ニ ニニ ベジ ウー ゴ ニ ニ ニー コー 
5 FUNCTIDN 34』 MRITE RANDDN H 
5 デ ーーーーーーー ニ ーー ニー 一 oma ポー H 
olioo QRG 10OH 
OO5C = FCB EQU OO5CH ……FCB ア ドレ ス は , デフォー ルト の 5CH に 設定 . 
START ペ : 3 
1oo 219o4o 語り F 人 は 93 な cz 
O10 さ 227401 SHLD BETADR | ADR^ に . 初 其 信 4000H を セツ ト . 
O106 AF XRA A sp 3 
| 各 レ コー ド に 書き 込む デー タ を 格納 する ババ 
9407 322604 STA WTPATTN | マフ ト WTPATTN*, 初期 "00" を セツ ト . 
O1OA_OE16 VI C, 22 | FCB に 格納 され て いる ファ イル (コマ ンド ・ 
O10OC 11SCOO LXI D。FCB [ライン に 記述 し だ ファ イル ) を 新 だ に 作成 す 
O1OF CDOS5OQ CALL OOO5H | る . 
O112 FEFF CPI 255 ) ディ レフ トリ が いつ ば いで 作成 で き な い 場合 
O114 CA4FO1 JZ ERRDR  , は , “ERROR" に ジ ヤ ン プ . 
Q117 AF XRA に 1 FCB の *r2? フ ィ ー ル ド に 00 を セッ ツ ト し て お 
Q11 さ 27Foo STAa FCB+S5 | ご . 
NXTRE ビ Cs 
O11B 218ooo LXI H。BOH 
O11E さ A76O1 LDA MTPATTN 
O121 4F MOV C。A 
デフ ォ ー ル ト の DMA パ ッ フ ァ , 80HーFFH の 
BUFLOOP* 128 パ イト を , 書き 込み デー タ 用 パッ ファ *W- 
0O122 71 MV M,C TPATTN* に 格納 され て いる t イ ト の デー マタ 
O12 く 2 マ INX H で フィ ル す る (うめ る ). 
Oo124 7D MOV Aa し 
O125 BZ ORA Aa . 
O126 ヒ 222O01 JNZ BUFLOOP 
2 固 き 込み 用 デー マ の 値 を 1 つ イ ンク リ メ ン ト 
O12A 79 MOV A。C し "WTPATTNP 記 杭 
O12B さ 27601 STA MTPATTN | ご 
PUTROR1 : 
0O12E 27401 LHLD BETADR 
O1 さ 1 7E MV AzM | 2 ドレ ス 400.t の 5 の レコ ー ド あの 
O1 さ 2 さ 27DOO STA FCB+ さ 3 | アド レス - ポ イン "GETADR* の 指し 示す レ 
O135 2 さ INX H も 14 TO フ 
O1 さ 6 7E MOV A。M イー ルド へ セッ ツ ト す る . 
01 さ 7 さ 27EOQO STA FCB+ さ 4 
O1 さ Q FEFF CPi OFFH *r1* の 値 が FFH の 場合 は , レコ ー ド 番号 表 の 
013C CASBO1 JZ CLOSE | 胃 了 を 示す の で 。 CLOSE* へ ジャ ンプ . 


シス テム ・ コ ー ル 徹底 実習 


2 さ け 4 3 区 で いり 
ラッ フ 7401 BETApf 交 の レコ ー ド に , ア ドレ ス - ボ ポイ ンタ を セッ ト . 


OE22 に 。 さ 4 | 
115COo D。FCB いい ラ ンダ ム な 書き 込み "の シス テム ・ コ ー ル . 
CDoO5oo ooo5H 


B7 は] | 正常 に 書き 込み が 行わ れ だ 場合 は "NXT- 
CA1BO1 NXTREC ! RECY ヘ へ ジャン プレ, ルー プ . 


OEo9 C。9 0 で 
1168O1 D,MSGERR . | エ | ぱし て cda プロ グラ ム を 終 


CDOSOO ooo5H 
9 


OE1O 
115COO CB 
CDoS5oOo ファ イル ・ ク ロー ズ の シス テム ・ コ ー ル . 

クロ ー ズ し 終わ つて , ファ イル が 正常 に 生成 され だ ら , 
FEFF 0H に ジャ ンプ し レ , リブ ー ト し て CPM に 戻る . ク ロー ズ 
CA4FO1 で き な い 場合 は , *ERR-OR" に ジャ ン ブ . 


C3OQOOO OOQO 


ODOQ455S252 MSBERRs DB ODH。 OaH。 *ERROR ! 7 。ODH。OAH。" 


BETADR』 DS 2 
MTPATTN』 DS 1 


END 


Figure-2.2.65 ファ ンク ショ ン :34 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ブル し , “34 . COM” を 生成 
し て 実行 し て み ま し ょ う ). 


ファ ンク ショ ン : 34 実習 プロ グラ ム の 実行 


新た に フォ ー マ ッ ト し た 空 デ ィ ス ケッ ト を ドラ イプ B : に セッ ト し , 当 プ ログ ラム を 実行 し て み ま 
本 ま 旬 

当 プ ログ ラム の 実行 に は , NEC の PC-8001CPM を 使い まし た . この CPM に は , ディ スク の \ ス 
キュ ー” が な く , フィ ジ カ ル な セク タ No 順 に リー ド プ ライト が 行わ れる の で , 当 プ ログ ラム の 実行 結 
果 を 解説 する 際 。 ラン ダム ・ レ コー ド 番 号 。 ディレク トリ の デー タ , 実際 の セク タ の 関係 が 分 か り 易 
く 〈 く な る の で 好都合 で す . 

当 プ ログ ラム の 実行 に は , 事前 た ラン ダム ・ レ コー ド 番 号 の 表 を アド レス 4000H か ら ロ ー ド し て お き 
ます 。 

まず , その 実行 例 か ら 示 し ます . 


全 シ ステ ム ・ コ ー ル 徹底 解説 


A>DDT RND.HEX / ^RND. HEX" を DDT を 使っ つて ロー ドレ し , ご これ を ラン ダム 番号 表 と し て 使用 す 
ソー ス ・ フ ァイル "RND. ASM" の "ORG”" は , 4000H と し て ある の で , ラン ダム 寺 表 は 
DDT VERS 2.2 自動 9 に 4000H か ら ロ ー ド され る . 


ーD40OO。 402F / "ロー ド さ れ だ ラン ダム 番号 の 確認 . 0000, 0001,0002.01A6, と , ロ ー ド され て いる . 

400O OO OO O1 OO O2 OO ae6 O1 AS O1 47 O1 1 O2 1 02 。。・。 

4010 17 O2 7 OO AS OO 3 さ O OO 2B OO FF FF OO OO OO OO ・・・- -・O・ キ ・・ 
QO OO OO 00 0O 0QO OOQ OO OO 00 00O 00 ・・ ユーーーーーーーー・ 


Figure-2.2.66 ラン ダム ・ レ コー ド 番 号 表 を . アド レス 4000H か ら ロ ー ド し て お く . 


ラン ダム ・ レ コー ド 番 号 表 が ロー ド さ れ た ので, 当 プ ログ ラム を 実行 し て み ま し ょ う . 
実行 する た め の コ マン ド 形 式 を 次 に 示し ます . 
34_」x : filename.ext 』…… ドラ イプ x : 上 に ,。 ラン ダム ・ フ ァイル ~filename . ext” が 作ら 


れる . 
実行 例 を 次 に 示し ます . 


n> さ 4 BiTEST.RND / … 実習 プロ グラ ム の 実行 . フラ イル 名 *TEST. RND" の ラン ダム ・ ア クセ ス ・ フ ァイル 
が , ドラ イブ B : 上 に 作ら れる . 


A>STAT BiTEST.RND / … ド ライ ブ B : 上 に 作ら れ だ , ラン ダム ・ フ ァイル "TEST. RND“ の 確 妥 . 


で - 表 は 13 レ コー ド の み 還 を 込み が は わ わ だ フ ァイル で ある の に 
22 プ 日 k S R/M BiTEBST 。 RND 5 


人 > 


Figure-2.2.67 ファ ンク ショ ン :34 実習 プロ グラ ム の 実行 . 


ラン ダグ ダム ・ フ ァイル が , 空 の ディ スケ ッ ト 上 に 作ら れ ま し ぶた . 

で は , ラン ダム ・ フ ァイル と は どの よう な も の で ある の か , まず 「 レ コー ド 番 号 一 一 ディ レク トリ 
ー 一 実際 の トラ ッ ク ・ セ クタ 番号 」 の 関係 か ら 解 説 し て 行き まき しょう. 

まず , “34 . COM” の 実行 に よっ て 作ら れ た ラン ダム ・ フ ァイル , “TEST . RND” の ディ レク トリ 
を , シン クウ ェ ア ・ ラ ブ ズ 社 の セク タ ・ デ ィ ス プレ イ ・ プ ログ ラム を 使っ て 調べ て み ま す . 空 の ディ 
スケ ッ ト 上 に 作ら れ た ファ イル な の で , 8 イン チ ナチ 標準 ディ スク や PC-8001 の 1W (片面 ) で は , ディ レ 
クト リ 部 の 先頭 で も ある, トラ ッ ク 02 の セク タ 01 か ら , “TEST . RND? の ディ レク トリ が 記録 きれ て い 
る は ず で す . その ディ レク トリ 部 の 様子 を 次 に 示し ます . 
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シス テム ・ コ ー ル 衝 底 実習 


>SECD1G8 ) 


ニー ニニ ニニ ニー SECTOR _ DISPLAY PROUGRAN  V1. き ニー ニニ ーー ニー 
for PC-BOO1 CPZ/M_ 
copyright by SYNCMARE LAQBB 


1nput dimwk name AA-D >B 
1nput track 昔 00- さ 4 >02 

1nDPut gc 上 Or 幕 O1- さ 2 >O1 

D) isp1 ay。 N) ex sectOr isD・。 人 QA) ut も to next。 X ) any =e@ こ と も モロ ヒ R) mb@ot CP/N 
1nput D。 N。 人 。 X。 R。 D 


DISK=B TRACK=O2 SECTUR=O1 
oO 54 45 5 く < 54 2O 2o 2o 1 ・TEST RND . . 1 
【O2) OO QO 0O_ 00 (0Q⑦(Q8) 00 C )Q 人 人 cs 
0O 54 45 5 さ S4 20 20 20 | OO 0o [27| .TEST RND. . " 


oo 54 45 5 さ 54 2o 2o 2o E 4 RND。 。 .H 
[OO_OO GO GO_ GO GO GO 9 H 夫 ar 


DISK=B TRACK=O2 SECTUR=O2 
BOO 

Bi 1O 

B』 20 

Bs さ O ES ES ES ES ES E5 E5 
Bs40O ES5SESE5SE5ESES5ES5 
BaSO ES5SESESESES ES ES 
Ba6O ESE5SE5SES5SE5SE5 ES 
Ba7O ES ES ES ES E5 ES ES 


Figure-2.2.68 ファ イル TEST. RND” の ディ レク トリ 部 の セク タ ・ ダ ンプ . 


実習 プロ グラ ム に よっ て 作ら れ た ラン ダム ・ フ ァイル TEST . RND” に よっ て , 5 つの ロジ カル ・ 
エク ステ ント (1 ロジ カル ・ エ クス テン ト は 32 バ イト か ら 成 る ) が 生成 され て いる こと に 注目 し て 下 
さい . さら に 注目 する 箇所 は , それ ぞ れ の エク ステ ント の , 


13 バ イト 目 …… その エク ステ ント の 番号 (00 一 31 10 進 ). 
16 バ イト 目 …… その エク ステ ント 中 で 使用 きれ た レコ ー ド 数 (1 一 128 10 進 ). 
17 バ イト 目 一 32 バ イト 目 …… アロ ケー ショ ン ・ マ ッ プ !. 


で あり , それ ぞ れ の アロ ケー ショ ン ・ マ ッ プ の 「“ 〇 ? 印 の 値 と , その 位置 に も 注目 し て 下さ い . 

次 に , この ディ レク トリ の 注目 すべ き 部 分 を , 分 か り 易 く 書き 移 し た 表 を 示し ます . それ ぞ れ の エ 
クス テン ト の 13 バ イト 目 (エク ステ ント 番号 ) を 左端 に , 16 バ イト 目 (レコ ー ド 数 ) を 右端 に 置い て , 
各 エ クス テン ト を 1 行 で 示し て あり ます . 
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至 シ ステ ム ・ コ ー ル 徹底 懇 説 


13 バ イト 目 の 値 を 
ここ に 移し た も の . 16 バ イト 目 の 値 を 


「 Q② Qo 
日 00 10 
ロジ カル ・i| ! 1 1 
クス テン ト ! | 07 


1 0O 
纏 目 ! 180 
ロジ カル ・! | 
フス テット! 87 


ジ カ ル ・」. ! 
エク ステ ント 1 107 


棚 且 |!20 
の ロジ カル ・!「」 
エク ステント! 207 
DI SK=BI TRAC に K=Q2 SECTUR=O2 


1 
KG1】 ioo oo oo oo 6 oo oo oo oo oo 
に 際 計 因 u 議 
AA 


I ! 
9F 


1 1 I 1 1 1 
71 AEE BBF OO の GF 07 DF 


まだ 作ら れ て いな い ロ ジ カ ル ・ エ フス テン ト 


ロジ カル ・ エ フス テン ト の 番号 


Figure-2.2.67 の "Recs" の 
項 と 一 致す る . 


Figure-2.2.69 「 エ クス テン ト 番 号 一 一 アロ ケー ショ ン ・ マ ッ プ ・ レ コー ド 番 号 一 一 含ま れる レコ ー ド 
数 」 の 関係 . 


この 表 を 基 に , ラン ダム ・ フ ァイル の 詳細 な 解説 に 入り まし ょ う ). 

まず , 8 イン チ ナチ 標 準 デ ィ ス ク で は , 1 ロジ カル ・ エ クス テン ト で 16K バ イト の ディ スク 上 の デー タ を 
管理 する こと が で きま す . 各 エ クス テン ト に , 16 バ イト の ディ スク ・ ア ロケ ーション ・ マ ッ プ が あり , 
その 1 バイ ト が ディ スク 上 の 1K バ イト の プロ ッ ク を マッ ピン グ (指し 示す ) する た め , 16 バ イト で 16 
K バ イト の ディ スク 上 の エリ ア を 管理 で きる 訳 で す . 

ラン ダム ・ フ ァイル で は , シー ケン シャ ル ・ フ ァイル と 異な り 。 ロジカル ・ エ クス テン ト の 番号 が , 
00,。01。02、…… と , 順番 通り に は 並び ませ ん . Figure-2.2.69 の 例 で は , 00, 03, 02, 04,、 01 と いう 
順に な っ て いま す . 
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また ,。 ディス ク ・ ア ロケ ーション ・ マ ッ プ 上 で も ,。 シー ケン シャ ル ・ フ ァイル の よう に 。 左 か ら 順 
に マッ ピン グ さ れ て いる 訳 で は あり ませ ん . 中 抜け て, と びと びに マッ ピン グ さ れ て いま す . 
Figure-2.2.68 お よび Figure-2.2.69 で , 4 番目 の エク ステ ント に つい て 説明 し まし ょ う . この エク 
ステ ント の 16 バ イト は , 次 の よう に な っ て いま す . 


00TESTO こ ORND0O4000018 
00 00 06 05 00 00 00 00 00 00000000000000 


13 バ イト 目 の エ クス テン ト 番 号 が “04′ で ある と いう こと は , その エク ステ ント が 04※128=04 メ 
80 (HEX) =200 (HEX) 台 の 128 個 の レコ ー ド を 管理 する こと を 示し て いま す . つま り , レコ ー ド 番 
号 の 200 (HEX) -27F (HEX) を , この 4 番目 の エク ステ ント が 管理 する の で す . 

そし て 。 ア ロケ ーション ・ マ ッ プ の 3 バイ ト 目 の “06” と いう 値 は 。、 こ の 3 バイト 目 , つ まり レコ 
ー ド 番号 の 210 (HEX) 一 217 (HEX) の 8 レコ ー ド が , ディ スク 上 の 1K バ イト 単位 の 位置 を 示す , 
プロ ッ ク 06 (8 イン ナチ 標準 ディ スク で は , 1 プロ ッ ク は 8 レコ ー ド =1K バ イト ) に 当っ て いる こと を 
示し て いま す . 

アロ ケー ショ ン ・ マ ッ プ の 4 バイ ト 目 の “05” は , 同じ く 当 ファ イル の レコ ー ド 番号 218 (HEX) 一 
F (HEX) の 8 レコ ー ド が , ディ スク 上 の プ ブロック 05 に 当っ て いる こと を 示し て いま す . 

プ ブロ ッ ク 番 号 は , 00 か ら 始 まり , デ ィ レ クト リ ・ エ リア の 先頭 を 00 と し て , 8 セ クタ ご と に 01, 02,…… 
と な り ま す . よっ て , 8 イン チ 標 準 デ ィ ス ク や PC-8001CP ン M (1W) で は , 次 の 表 の よう に な り ま す . 


( 注 ) 標 準 ディ スク は , この 表 の 値 に スキ ュー 変換 し た も の が , 物理 的 な セク タ 番 号 と な り ま す . 


実際 の トラ ッ ク , セク タ 番 号 
プ ブロック 番号 | 通算 セク タ 番 号 標準 ディ ス PC 一 8001(IW) デ ィ ス ク 
| |26 セ クタ バト ラッ ク | 26 セ クタ ハト ラッ ク ( 魏 交 | 32 セ クタ /! ト ラッ ク ( ス キュ ー な し ) 
と 01 一 08 


選 ニ テー で ぐふ ヽ 刷 
に が が 所!4 
に が が お が!4 


Figure-2.2.70 当 例 題 の 実行 で 書き 込ま れ た レコ ー ド の ディ スク 上 の アロ ケー ショ ン 


媒 登 甚 こ さくい 
に が が 所!2 


に いい が 人 | に 2 導 > が が | に 2 


全 シ ステ ム ・ コ ー ル 徹底 解説 


例え ば , Figure-2.2.69 の プ ブロック 04 は , PC-8001 CPM (1W) の ディ スク で は , トラ ッ ク 03 の セ 
クタ 01 一 08 に 当たっ て いる こと に な り ま す . し か し Figure-2.2.64 を 見 る と , プ ブロック 04 の レコ ー ド 番号 
140-147 の 内 , 147 の み し か 書き 込み を 行っ て いま せん . よっ て , トラ ッ ク 03 の セク タ 08 の み に デ ー タ 
*05” が 書き 込ま れ て いる は ず で す . 

実習 プロ グラ ム を 実行 し た 後 , 実際 に デー タ が 書き 込ま れ た セク タ を ダン プ し て 次 に 示し ます . 


DISK=B TRACK=Q02 SECTUR=1 7 

BOO QO OO OO QO OO QO OO 00 OO QQO QO OO 0Q 0O 00 oO 
Bi1O OO QO OO 00 OO OO OO OO 00 OO QO OO 0OO 00 00O CO 
Bs2O QO QO OO OO QO 0O Q2 QQ OO OO QO OO OO OO OO oO 
Bs さ O OO OO OO QO OO OO oO OO OO OO OO OO OO OO OO OO 
Bs4O OO OO QOO QO QOO OO QO QQO QQ OO QO OO OO OO OO Oo 
BsSO OO OO OO OO OO OO OO OO OO QO OO OO OO OO OO Oo 
Bi6O OO QOO OO OO OO OO OO OO QO OO QOQ OO OO OO OO Qoo 
Bi7O OO OO OO OO OO OO QO OO OO OO CO 00 OO 0O OO OO 


DISK=B TRACK=O2 SECTOR=18 

BsOO  Q1 01 0O1 O1 QO1 O1 01 O1 01 0O1 O1 01 0O1 O1 0O1 Q1 
Ba1O OO1 0O1 0O1 01 O1 O1 O1 O1 O1 O1 O1 0O1 O1 O1 Q1 O1 
Bs2O  O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 
Bs さ O  O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 
Bs4O  O1 Oi1 O1 O1 O1 O1 O1 O1 O1 O1 OQ1 Oi1 O1 O1 O1 O1 
BsSO Oi O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 
Bs6O  O1 Qi1 O1 O1 O1 O1 O1 O1 O1 O1 Q1 O1 O1 O1 O1 O1 
Bs7O  O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 O1 


PERROEEEE 区 まき きま) 
ORIRERERORE ま きき すす) 
POKER すま ます すま すき) 
PO すま ます すす 
PIE すま きき 
PO ミミ すす すす 
PO EE まま ます 


DISK=B TRACK=02 SECTUR=19 

BOO 0Q2 02 0202020202020202020202020202 
Bs1O OO2 02 02 02 02 02 oO2 02 O2 O2 O2 02 O2 02 02 02 
Bk2O Oo2 oO2 O2 QO2 O2 Oo2 QO2 Oo2 O2 Q2 O2 O2 QO2 Oo2 0O2 Q2 
Bs さ O  O2 O2 O2 02 O2 O2 QO2 O2 O2 Oo2 O2 Oo2 Oo2 Oo2 Q2 O2 
Bs4O Q2 O2 O2 QO2 Oo2 Oo2 Oo2 o2 O2 OoO2 Oo2 O2 Oo2 O2 Q2 02 
BiSO OO2 Q2 Qo2 Q2 Q2 Q2 Oo2 Oo2 Q2 Oo2 O2 02 Oo2 O2 02 02 
Bs6O Q2 0O2 02 02 02 02 Q2 02 02 0O2 O2 02 O2 02 02 02 
Bi7O 0O2 02 02 02 02 02 02 02 02 02 02 02 02 02 02 02 


DISK=B TRACK=O2 SECTUR= さ OQ 

BaOO Q4 O4 Oo4 O4 QO4 QO4 Q4 Q4 Q4 Q4 QO4 Q4 Q4 Q4 0O4 O4 
Bs1O OQ4 Oo4 Oo4 Q4 QO4 QO4 QO4 Oo4 Oo4 Q4 O4 QO4 Q4 QO4 QO4 O4 
Bs2O Q4 Oo4 oO4 Q4 Q4 Q4 QO4 Q4 QO4 Q4 Q4 Q4 Q4 QO4 Q4 O4 
Bs さ O Oo4 oO4 Q4 oO4 Oo4 Oo4 Q4 Oo4 Oo4 Oo4 Oo4 Oo4 Oo4 Oo4 QO4 Oo4 
Bs4O OO4 o4 Oo4 Oo4 QO4 Oo4 QO4 Q4 Q4 Q4 QO4 Q4 Q4 QO4 O4 O4 
BsSO Oo4 Q4 QO4 Oo4 Q4 0O4 Q4 QO4 04 Q04 04 04 Q4 Oo4 Qo4 O4 
Bs6O 0O4 0O4 Oo4 04 Q4 0O4 Q4 Q4 04 Q4 Q4 04 Q4 04 04 04 
Bs7O 04 QO4 Q4 04 04 04 04 Q4 04 Q4 04 04 Q4 04 04 04 


DISK=B TRACK=O2 SECTUR= く 1 

BOO  O さ 3 O さ O さ 0O さ 3 O さ QO く O さ OS OS QOS Q さ O さ QO さ OS 0O さ Q さ 
Bs1O  O さ O さ Q3 OS OS OS3 OS OS 0O3 さ O3 O さ O さ O さ O さ O さ Q ミ 
Bs20  O さ O さ O さ O さ O さ O さ 0 さ Q さ O さ OS O さ 3 O さ Q さ O さ OS O さ 
Bs さ O  O3 OS O さ O3 O さ 0O3 O さ O さ O さ 0O さ O さ O3 O さ OS OS OS 
Bs4O  QO く 3 O さ OS OS OS OS OS OS3 OS OS 0O さ Q さ O さ QOS QO3 O さ 
BSO  O3 OS O3 OS 0 03 03 03 OS 03 OS 0O さ 0O さ OS OS O さ 
Bi6O 03 OS 0 ミ 0 さ QOS 0 さ OS O さ QOS 0O さ O さ OS 0 ミ 0 さ QO さ 0O さ 
Bi7O 0O3 0O さ OS3 OS OS 03 OS OS OS 03 O さ 0O さ 0O さ 03 OS3 O ミ さ 


DISK=B TRACK=O さ 


BiOQO 
Bs1O 
Bi 2O 
Bs さ O 
Bi 4O 
BS5O 
Bi 6o 
Bs 7O 


05 
05 
05 
oO5 
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O5 
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9 に) 
QS 
05 
OS 
O5 
に 1 
O5 
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Ba1O 
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Bi SO 
Bs 6O 
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Q6 
O6 
O6 
06 
Q6 
O6 
06 
06 


06 
Q6 
Q6 
06 
Q6 
リコ 
Q6 
O6 


06 


06 
06 
Q6 
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06 
Q6 
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Bs1O 
Bi 2O 
Bs さ O 
得 k 40 
Bi SO 
Bi 60 
Bi 70 
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OZ 
07 
07 
07 


07Z 


07 
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Bi 20 
Bi さ OQ 
Bs 4O 
Bs SO 
Bi る Oo 
Bi70 


QAa 
Ooa 
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Oa 
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Oa 
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1 
OA 
Oa 
oOA 
Oa 
Ooa 


Oa 
Ooa 
QA 
OA 
oOA 
Oa 
QA 
Oa 


OA 
oOa 
Oa 
oOA 
OA 
OA 
OA 
oO^ 


DISK=B TRACK=O さ 
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Q5 
05 
05 


05 
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O5 
O5 
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05 


OS 
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05 
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05 
O5 
O5 
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oO5 
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06 
Qe 
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06 
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06 


06 
06 
Qe6 
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O6 


Q6 
O6 
Q6 
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06 
06 


SECTUR=1 1 


ア 4 
OZ 


0Z 


OZ 
OZ 


0Z 
OZ 


SECTUR=24 
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O8 


Oo8 
Oo8 
oO8 
OB 
O8 
08 
08 
OB 


Oo8 
OB8 
oO8 
Oo8 
Qo8 
O8 
QB 
OB 


O8 
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OA 
Oa 
QA 
1 


1 ] 
Oa 
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至 シ ステ ム ・ コ ー ル 徹底 衣 説 


DISK=B TRACK=O4 SECTUR=O1 

Bi OO OB OB OB OB OB OB OB 

Bi 1O OB OB OB OB OB OB OB 

Bi 20O OB OB OB OB OB OB OB 

Bs さ O OB OB OB OB OB OB OB 

Bi 40 OB OB OB OB OB OB OB EE 
Bs SO OB OB OB OB 』 PE 
Bs60 OB OB OB OB 

Bi70 OB OB OB OB 


DISK=B TRACK=O4 SECTOR=12 
BOO oOC OC OC 


6 
8 
6 


Bs 1O 
Bi 20 
Bs さ O 
Bs 4O 
Bs SO 
Bi 60 
Bs7O 


88888888 
8888888 
8888888 
8888888 
8888888 
88888888 
88888888 
98888888 
88888888 
8888888 


Figure-2.2.71 実習 プロ グラ ム の 実行 に より , 書き 込み が 行わ れ た セク タ の ダン プ . 


@ Figure-2.2.64 の レコ ー ド 番号 と , 書き 込む ゲー タ の リス ト . 

@ Figure-2.2.68, Figure-2.2.69 の 作成 され た ファ イル の ディ レク トリ の ダン プ ・ リ スト . 
@Figpure-2.2.70 の ブロ ッ ク 番 号 に 対す る ディ スク 上 の セク タ 表 . 

@ Figure-2.2.71 の 実際 に 書き 込み が 行わ れ た セク タ の ダン プ ・ リ スト . 


これ ら の 資料 を 関連 付け て 見 る こと に より , ラン ダム ・ ア クセ ス の 機能 が 理解 で きる も の と 思い ま 
9 

誤解 し や すい も の の 1 つ に 1 レコ ー ド 番号 と , ディ スク 上 の アロ ケー ショ ン の 関係 が あり ます . 

1 つの ファ イル 内 で は , 各 レ コー ド 番 号 は , ディ スク 上 の 該当 する セク タ と 1 対 1 に 対応 し ます が , 
別 の ファ イル で は , 先程 の ファ イル と 同じ レコ ー ド 番号 で も , 全く 別 の セク タ に 当たり ます . つま り , 
レコ ー ド 番号 は ,、 ディ スク 上 の 絶対 的 な 位置 を 示す も の で は な く , それ ぞ れ と ファ イル 内 で の 相対 的 
な 位置 を 示す も の で ある と 理解 し て 下さ い . 

この 意味 の 理解 を 助け る た め に , 実習 プロ グラ ム 34 .COM” を , 先程 の ディ スク 上 に 前 回 と 同じ 
レコ ー ド 番号 表 に より , 続け て も う 一 度 実行 し た 場合 (今度 の ファ イル 名 は “2ND . RND” と し た ) 
の ディ レク トリ 部 を ダン プ し て 示し ます . 全く 同じ ラン ダム ・ レ コー ド 番 号 に 書き 込み を 行っ た 2 つ 
の ファ イル と いう 点 に 注目 し て 下さ い . 
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シス テム ・ コ ー ル 徹底 実習 


DISK=B TRACK=O2 SECT ロ R=O1 

Bs Oo 45 5 さ 54 88、 2o 2o 2o 52 
Bi1O oo oo oo ⑥ の Goo oo oo 
Bi 2O 45 5 さ 54 2o 2o 2O 2o 52 
Bi 3O oo oo oo oo 
Bs 4O 
Bi SO 
Bi 6O 
Bi 70 


・TEST 


・TEST RND・ < 


8888 

8 市 8 証 8 高 る 各 
88888888 
88888888 


Es 888888) 


-・TEST RND 。 . . ( 


SI88 


-・2ND RND 1 


・2ND RND. .・" 


DISK=B TRACK=O2 rac 


・2ND RND. ..( 


ES E5 E5 ES ES5 ES E5 ES E5 ES E5  。。。・・ に こっ 
ES ES ES ES E5 E5 E5 ES ES ES ES 。。。。・ に 1 
ES ES E5 ES ES ES ES ES ES ES ES 。。。+: ユ ーー ニー・・・・・ 
ES ES ES E5ESE5 ES5 ES ES ES ES ES ES E5  。。。。・・ = 


Figure-2.2.72 全く 同じ ラン ダム ・ レ コー ド 番 号 表 に より , ファ イル 名 の 異な る 2 つの ファ イル を 作る . 


前 回 の “TEST . RND” に 続い て , 同じ よう に ディ レク トリ が 作ら れ ま し た . し か し , アロ ケー シ 
ョ ン ・ マ ッ プ の それ ぞ れ の ブロ ッ ク 番 号 だ けが 異な っ て お り , 同じ レコ ー ド 番号 を 使っ て も 書き 込み 
が 行わ れ た 物理 的 な ディ スク 上 の 位置 が 異な っ て いる こと が 分 か り ま す . 

で は 次 に , ラン ダム な 13 の レコ ー ド で 作ら れ た 2 つの ファ イル , “TEST . RND” と “2ND. RND” 
の 内 容 (ラン ダム ・ レ コー ド の 取り 出し 順に , それ ぞ れ の セク タ が , 128 バ イト の 00, 01, 02,。…… 6 
00 で フィ ル さ れ て いる ) と , それ ら の デー タ が 書き 込ま れ た ディ スク 上 の 物理 的 な 位置 の 関係 を 示し 
まず 。 

デー タ が 書き 込ま れ た セク タ の 位置 は , Figure-2.2.72 と , Figure-2.2.70 か ら も 求め る こと が で き 
ます が , ここ で は , フォ ー マ ッ ト し た 直後 の 完全 に 空 の ディ スケ ッ ト と の , トラ ッ ク to ト ラッ ク の 実 比 
較 に よっ て 調べ て み ま す . 先程 の シン クウ ェ ア ・ ラ ブ ズ 社 の セク タ ・ デ ィ ス プレ イ と 同じ パッ ケー ジ 
に 含ま れ て いる ,、 コン ペア ・ デ ィ ス ク の プロ グラ ム を 使っ て いま す . 

ラン ダム ・ ア クセ ス に より 書き 込ま れ た 2 つの ファ イル が 占め る セク タ は , “COMPARE ERROR" 
と な っ て , すべ て 表示 され て いま す . それ ら の セク タ に 何 が 書き 込ま れ て いた か を , その 右 に 示し ま 
し だ 。 
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至 シ ステ ム ・ コ ー ル 徹底 解説 


/ Ayuprsk」 N 
====== ニ DISK COMPARE PROBRAM  V1.5 ====== 


FOR PC-BOO1 CP/NM 

coPyright by  -SYNCMARE LABSー 
1n ロ DU も a レ 上 上 ac に 益 OOー さ 4 >02 
1 nDut sa レモ る と も Or 芋 〇 O1-- さ 2 >1Z 
COMPARE ERROR UN TRACK= O2 SECTOUR= 17 00 
CONPARE ERROR ON TRACK= O2 SECTOR= 1 
COMPQARE ERRDR ON TRACK= O2 SECTOR= 19 02 
COMPARE ERRUR UN TRACK= O2 SECTOR= さ OQ 04 
CUMPARE ERRUR UN TRACK= O2 SECTDR= 31 03 
COMPARE ERRUR UN TRACK= O さ SECTOR= O 05 ファ イル 
COMPARE ERROUR UN TRACK= O さ SBECTOR= O9 0O6 TEST. RND 
CONPARE ERROR UN TRACK= O さ SECTOR= 11 07 
COMPQRE ERRUR UN TRACK= O さ SECTOR= 24 08 
COMPARE ERRUR UN TRACK= O さ SECTOR= 3O 0A 
CUMPARE ERRUR ロ N TRACK= 0O さ SECTOR= 32 09 
COMPARE ERRUR UN TRACK= O4 SECTOR= O1 0B 
COMPARE ERRDR UN TRACK= O4 SECTDR= 12 0C 
COMPARE ERRUR UN TRACK= O4 SECTUR= 1 アフ 00 
CONPARE ERRUR 0 ロ UN TRACK= O4 SECTOR= 18 01 
COMPARE ERROUR UN TRACK= O4 SECTOR= 19 -02 
COMPARE ERRUR UN TRACK= O4 SECTUR= さ O -04 
COMPARE ERRUR UN TRACK= O4 SECTOR= さ 1 -03 
CUMPARE ERRDR UN TRACK= O5 BECTOR= OB 0O5 
CDMPARE ERRUR DN TRACK= OS SECTOR= O9 0O6 0 
CMPQARE ERRDR OUN TRACK= OS BECTUR= 11 0O/ 6 
COMPARE ERROUR UN TRACK= OS SECTOR= 24 08 
COUMPQARE ERRUR UN TRACK= OS5 SECTUR= さ O 0A 
COMPARE ERRUR UN TRACK= OS SECTUR= さ 2 09 
CDMPARE ERRUR UN TRACK= O6 SECTOR= O1 0B 
COMPARE ERRUR UN TRACK= 0O6 BECTOR= 12 - 0UC 

4 
キャ キャ ++ END PF LAST TRACK ++ キ ++ 


それ ぞ れ の セク タ に 書 
\N 1!11!! COHPARE ERROR EXIBT !!!!! 寺 込 まわ れ て いる デー マ 


Figure-2.2.73 同一 ラン ダム ・ レ コー ド 番 号 で 2 つの ファ イル を 作成 し た 場合 の , 書き 込ま れ た 内 容 と 
ディ スク 上 の 実 セ クタ の 関係. 


ラン ダム ・ ア クセ ス の 基本 的 な 機能 は 、。 ファ ンク ショ ン : 33, 34, 36, 40 の 実習 プロ グラ ム て で 解説 
され て いま す が , 要する に ,「 レ コー ド の ラン ダム な 読み 書き が で きる 」 と いう 一 言 に 尽き ます. し か 
し 我々 CPM ユー ザー に と っ て , 問題 は その 後 の こ と で あり , これ ら の 機能 を いか に 有効 に 応用 する 
か だ こと で し ゃ す 。 ' 

漢字 ワー ド ・ プ ロ セ ッ サ な ら 「 辞 書 」 の 検索 に 応用 で きる で し ょ う .「 辞 書 」 の “早見 表 "” を シー ケ 
ン シ ャ ル ・ フ ァイル で 作り , “早見 表 ” で 目標 を 一 応 見 つけ て か ら , 「 辞 書 」 に ラン ダム ・ ア クセ ス さ 
せる か , ある い は も っ と 効率 の 良い テク ニッ ク を 使う の か …… 6 
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シス テム ・ コ ー ル 徹底 実習 


ラン ダム ・ フ ァイル の 応用 に は , 様々 の テク ニッ ク が ある で し ょ う . そこ は 各自 で 試み て 頂き た い 
と 思い ます . 


ファ ンク ショ ン : 35… フ ァイル ・ サ イズ の 計算 


CALL 手 順 

MVI CC。 35Pom (23H) 

(D, E) で FCB ア ドレ ス 

CALL 0005H 

ト 

(FCB の r0, r1, r2 に ファ イル ・ サ イズ が セッ ト さ れる ) 
機能 
(D, E) レジ スタ で アド レス され る FCB で 示さ れる ファ イル の , エン ド ・ オ プ ・ フ ァイル の 湊 の レコ ー 
ド 番 号 を , FCB の r0, r1 フ ィ ー ル ド に セッ ト す る . LSB は r0 に , MSB は r1 に セッ ト さ れる . ファ イル 
が 最大 の レコ ー ド 数 で ある 65536 を 持っ て いる 場合 は , フィ ー ル ド r2 に 01 が セッ ト さ れる . この 機能 に 
より , ファ イル の 大 きき さき ( 総 レ コー ド 数 ) を 知る こと が で きる . 
FCB の フィ ー ル ド r0,r1 に セッ ト さ れ た 値 は 、 シー ケン シャ ル ・ フ ァイル の 場合 は , 実際 の ファ イル 
の サイ ズ と 一 致す る が , ラン ダム ・ フ ァイル の 場合 は 、 ファ ンク ショ ン : 35 の 実習 で も 経験 し た よう 
に “中 ぬけ ? が 存在 する た め に , 実際 に 書き 込み が 行わ れ て いる レコ ー ド 数 より , ずっ と 多い 見 か け 
上 の ファ イル ・ サ イズ と な る 。. 
も う 1 つの 機能 (機能 と 言う より , 上 記 機 能 に 他 な ら な い が ) は , 当 フ ァ ン クシ ョ ン を 実行 する こと 
に より , ファ イル の 最終 レコ ー ド の 次 が FCB の r0, r1 に セッ ト さ れる こと を 利用 し て , 続け て ファ ン 
クシ ョ ン : 34 を 実行 する こと に より , その レコ ー ド 位置 に ラン ダム な 書き 込み を 行う こと が で きる . 
この 機能 の 様々 な 応用 が 考え られ る . 


実習 プロ グラ ム ファ ンク ショ ン : 35 


当 フ ァ ン クシ ョ ン を 実行 し た 後 の FCB の r0, r1, r2 の 各 フ ィ ー ル ド を , た だ 表示 する だ け の プロ 


グラ ム を 作り , 当 機能 を 確認 する . 


全 シ ステ ム ・ コ ー ル 徹底 解説 


この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


Oo1OO 
OOS5C 


Q10Q 
O102 
O1OS 


0108 
O10B 
O10E 
O111 


0114 
O1 17 


O11A 


O11B 
O11C 
011E 
O121 
0O122 
O125 


O126 
O127 
O12B 
O12E 
O12F 
O1 く 1 
O1 さ さ 
O1 さ 5 
O138 
O1 さ 人 
01 さ D 


O1 さ E 
O14O 
O141 
O144 


O145 


人 > 


>TYPE さく 5.PRN 』 


OE2 さ 
115COO 
CDOSOO 


さ A7DOO 
CD1BO1 
さ 7EOO 
CD1BO1 


さ 7FOO 
CD1BO1 


ヒ 9 


Figure-2.2.74 
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アア シグ ショ 


9 FUNCTION 


FCB 


STARTs 


DATAOUTs 


HEXDSPL Ys 
PUSH 
RRC ! 
CALL 
PP 
NI 
AD1 
CP1 
J ビ 
ADI 
CALL 
RET 


HOUT1』 


HOUT2* 


CONOUT』 
MVI 
NOV 
CALL 
RET 


END 


FRRC ! 


さ 5』 CDMPUTE FILE BIZE # 


FCB ア ドレ ス は デフ ォ ー ル ト の 5CH に 設定 . 


C。 さ 5 | 


D。FCB ファ イル ・ サ イズ の 計算 ? の シス テム ・ コ ー ル 
OQOSH 


FCB+ さ さ 
DATAOUT 
FCB+ さ 4 
DATAUUT 


FCB の r0, r1, r2 フ ィ ー ル ド の 順に , その 値 を 
コン ソー ル に 表示 する . 


FCB+ く 5 
DATAOUT 


プロ グラ ム を 終了 し て , CP/M に 戻る - 


] 

| 

| A レ ジス タ の 億 を , スペ ー ス を 前 置き し て , 

| コン ソー ル に 16 進 で 表示 する サブ ルー チン . 


PSM 


RRC! RRC 


A レ ジス タ の 個 を , 16 進 で コン ソー ル に 
| 表示 する サブ ルー チン . 


| A レ ダス タ の アス キー・ キ ャ ラク タ を , コン ソ 


5H | 一 ル に 出力 する サブ ルー チン ・ 


ン :35 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


シス テム ・ コ ー ル 徹底 実習 
上 記 ソ ー ス ・ リ スト か ら ア セン プリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ン ブ ル し , "35 . COM” を 生成 
し て 実行 し て み ま し ょ う . 
ファ ンク ショ ン :35 実習 プロ グラ ム の 実行 
実行 する た め の コ マン ド 形 式 を 次 に 示し ます . 


35.X : filename . ext…… ドラ イブ x : 上 の ファ イル `fiename . ext′ の ファ イル ・ サ イ 
ズ を 示す FCB の r0, r1, r2 の 値 を 表示 する . 


実行 例 と し て , シー ケン シャ ル ・ フ ァイル の “PIP . COM” と ,。 ファ ンク ショ ン : 34 の 実習 で 作成 
し た ラン ダム ・ フ ァイル “TEST . RND” に 対し て 実行 し た も の を 次 に 示し ます . 


A>STAT PJP。COM ) フラ イル *PIP. COM" の 状態 を 調べ て お ご. 


Recs Bytes Ext 人 cc 


58 Bk 1 R/M AzPIP.CON ---Recs の 項 の 舘 *58"CHEX で は 3A) に 注目 . 
Bytes Remaining Dn Ai 125k 


A>S5_PIP.CDM 7 ファ イル *PIP. COM* に 対し て , 実習 プロ ブラム の 実行 . 


ファ イル ・ サ イ ーー 
STAT コ マン ド で の 科 と 一 致す 


A>STAT BTEST。RND) ラン ダム ・ フ ァイル "TEST. RND* の 状態 を 調べ て お ぐ . 


Recs Bytes Ext QAcc 
22 フ 7 日 k 5 R/M BiTEST.RND Recs の 項 の 値 "227“CHEX で は 0218) に 注目 . 
Bytes Remaining ロ n Bi』 2 ささ k 


A>SS_BTEST。RND 7 .. ファ イル *TEST. RND* に 対し て , 実習 プロ グラ ム の 実行 . 


1B O2 OO …… フ ァイル ・ サ イズ は 021BCHEX) と 表示 され だ . STAT コ マン ド で の 値 と 一 致す る . 
人 > 


Figure-2.2.75 "ファ ンク ショ ン :35 実習 プロ グラ ム の 実行 例 . 
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全 シ ステ ム ・ コ ー ル 徹底 解説 


ファ ンク ショ ン : 36 


CALL 手 順 

MVI G、36mxo (=24H) 

(D, E) て FCB ア ドレ ス 

CALL 0005H 

3 

(FCB の r0,r1, r2 に , ラン ダム ・ レ コー ド No を セッ ト す る ) 
機能 
ファ イル を シー ケン シャ ル に リー ド プ ノラ イト し て , 任意 の 位置 で 当 フ ァ ン クシ ョ ン を 実行 する と , シ 
ー ケ ン シ ャ ル に リー ドラ イト し た 最後 の レコ ー ド 十 1 の レコ ー ド No を FCB の r0, r1, r2 フ ィ ー ル ド に 
セッ ト し , その レコ ー ド か ら の ラン ダム な リー ドブ プラ イト を 可能 に する . 


ーー 一 ww- シ ー ケ ン シ ャ ル に リー ドブ プラ イト 


レコ ー ド 
No. 
0 2 n 十 Iln 十 2ln 十 3 n 十 5 Ss 
レコ ー ド No.(n 十 3 ) が リー ドブ プラ イト され 


た 直後 に 当 フ ァ ン クシ ョ ン が 実行 され た 場合 , 
次 の レコ ー ド No.(n 十 4 ) が FCB の r0, rl に 
セッ ト さ れる . この まま ラン ダム な リー ドン 
ライ ト を 行う と , この (n 十 4 ) の レコ ー ド が , 
リー ド プ ライ ト さ れる こと に な る 。. 


(ある シー ケン シャ ル ・ フ ァイル ) 


実習 プロ グラ ム ファ ンク ショ ン : 36 


当 フ ァ ン クシ ョ ン を 基 に し た ラン ダム ・ ア クセ ス に よる 検索 プロ グラ ム の 作成 例 が , 次 の 2 . 3 章 に 
あり ます . その 検索 プロ グラ ム で は , シー ケン シャ ル に リー ドブ プラ イト され る 部 分 が 各 イ ン デ ッ ク 
ス に 対応 し た ラン ダム ・ レ コー ド No を 格納 する マッ プ 部 と な っ て いま す . た だ し , ここ で の プロ グラ 
ム で は マッ プ 部 は , わずか 1 レコ ー ド で す . 1 レコ ー ド で す が , この マッ プ 部 を 実習 の た め に 一 応 シ 
ー 委 シャ ル に リー ドア ライト を 行っ て いま すず す , 

当 フ ァ ン クシ ョ ン を 含め て ,。 ラン ダム ・ ア クセ ス の 応用 例 と し て , 2. 3 章 の 「 ラ ンダ ム ・ ア クセ ス 
に よる 検索 プロ グラ ム の 作成 」 を 参照 し て 下さ い . 
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シス テム ・ コ ー ル 徹底 実習 


MVI mee (=25H) 
5 ー ド タイプ ・ ペ クト ル 
CALL 0005H 
事 
((D, E) レジ スタ の 16 ビ ッ ト の ベク トル で 示さ れる ドラ イブ が リセ ッ ト さ れる ) 


機能 

(D, E) レ ジス タ に セッ ト す る 16 ビ ッ ト の ベク トル に 従っ て 。 ディ スク ・ ド ライ ブ の A : 一 P : の 任意 
の も の を リセ ッ ト 状 態 に する . 

例え ば , 16 ビ ッ ト の ベク トル が 次 の よう で あれ ば , 


D レ ジス タ E レジ スタ 


上 記 ベ クト ル に より , ドラ イプ B : と D : が リセ ッ ト さ れる . 
ディ スク ・ ド ライ プ は , リセ ッ ト に より オン ライ ン 状 態 を 解 か れ , ドラ イプ が R プ O に セッ ト さ れ て い 
る 場合 は ,、 R プ W に リセ ッ ト さ れる . 


実習 プロ グラ ム ファ ンク ショ ン : 37 


当 フ ァ ン クシ ョ ン は , 一 度 に 複数 の ドラ イプ を リセ ッ ト で きる が , ここ で は 実習 プロ グラ ム を 
簡単 に する た め , A : 一 D : の 4 つの ドラ イブ の 内 , 任意 の 1 つの ドラ イブ を リセ ッ ト す る プ 
ログ ラム を 作成 する . 


プロ グラ ム を 実行 する と , リセ ッ ト し た い ド ライ ブ 名 を 問い 合わ せ て きま す の で , AーD の 任意 の 
ドラ イブ 名 を キー イン する と , その ドラ イブ が リセ ッ ト さ れ ま す . 
この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 
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至 シ ステ ハム ・ コ ー ル 徹底 解説 


A>TYPE さ 7.PRN / 


FUNCTIUN さ 7』 RESET VRIVE (Vector ) 
ie に KT 


1ooH 

* ラ Pr セー ミ 
D' MSGkIN | ドラ ィ ブ の キー イン を 全 9 メ ッ セ ー ジ を 
ooo5H 


本 | コン ソー ル 入 力 の シス テム ・ コ ー ル . 


1 
OoO15 | キー 入力 が "*A" な ら ,。 DE レジ スタ に 
CA3701 RgET | 0 を セッ ト し て *RESETZ へ ジャ ンプ. 


FE42 Se 
キー 入力 が "B" な ら , DE レジ スタ に 

11020O D,。OOOO$OO1OB 和 へ ジャ ヤン プ 、 

CA さ 7O1 RESET | 09 を セット し て "RESE ジャ ンプ 


FE4 さ > ビッ 代 2 
11040O D。OOoO*O1OQB キー 入力 が C" な ら , DE レジ スタ に 
CA さ 7O1 RESET 04 を セッ ト し て “RESET“ へ ジャ ンプ . 


FE44 ・D* 
キー 入力 が *D* な ら , DE レジ スタ に 
CA304 RaeT |08 を セッ ト し て *RESET* ヘ ジャ ンプ . 


OEO2 C。2 ] 

1ESF E。"?” | キー 入力 が AD 以外 の 場合 は , "や? を 
Cposoo ooo5H | で, 再び キー 入力 に 帰る . 

C さ OBO1 KINERR 


に | "ディ スク ・ ド ライ ブ の リセ ッ ト “ の シス テム ・ コ ー ル . 
D, Vemctor ) : ここ に 来る 以前 に , DE レジ スタ の ベ フ トル は セツ 
ooo5hH | ト さ れ て いる . 

C9 プロ グラ ム を 終了 し て CP/M に 戻る . 

ODOA494ESO MSBKINs DB ODH。 ORH。" INPUT DRIVE NAME TU BE RESET >$* 


END 


Figure-2.2.76 ファ ンク ショ ン :37 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ブル し , “37 . COM” を 生成 
し て 実行 し て み ま し ょ う . 
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シス テム ・ コ ー ル 徹底 実習 


ファ ンク ショ ン : 37 実習 プロ グラ ム の 実行 
当 プ ログ ラム の 実行 は 。 まず , 
37 


と キー イン し , ドラ イブ 名 を 問い 合わ せる メッ セー ジ に 従っ て 。 AD まで (本 来 は AP の 16 ド ラ 
イプ を 任意 に リセ ッ ト 可 能 で ある が , 当 プ ログ ラム で は AD の 4 つの ドラ イブ に 制限 し て ある ) の 
ドラ イブ 名 を キー イン する こと に より 行わ れ ま す . 

実行 例 を 次 に 示し ます . 


>BTAT AmRZO 7 ドラ イブ A : を R/O に セッ ト 。 


人 A>STAT Bs=R/D/ ドラ イブ B : も R/O に セッ ト . 


P R/0 ロ WW 2 
ョ ココ 1 MM。 2 
Bs R/ ロ 。 BPacei』 2 ささ k | ^:, B: 共 に R/O と な つて いる . 


人 >3Z / --… 実 百 プ ログ ラム の 実行 . 
INPUT DRIVE NAME TO BE RESET >A_ に ライ ブ A: を リセ ッ ト . 


A>STAT / 果 の 人 認 . 

Bi R/ ロ 。 ー ャ 2 ささ k ドラ イブ A: が ガリ セット され た だ 直後 の STAT コ マン ド の 実行 な 
の で , ドラ イブ A : の レポ ー ト が 行わ れ て いな い . B : は 元 の 
まま の R/O で ある . 


A>37 / 再度 , 実習 プロ プラ ム の 実行 . 
INPUT DRIVE NAME TO BE RESET >B - 今度 は ドラ イブ : を リセ ッ ト . 


A>STAT/ 
人 ns RR/M。 下 /W。 Spacei 128k 4 ドラ イブ B : は リセ ッ ト さ れ て , OFF LINE 状 態 で や ある の 

レポ ー ト され て いな い . 当 鈴 RZW に リセ ッ ツ ト さ れ て いる . 発 
A> 程 の A : の リセ ッ ト 実 行 で , A : が R/W こ リセット さ れ て いる . 


Figure-2.2.77 ファ ンク ショ ン :37 実習 プロ グラ ム の 実行 例 . 


145 


全 シ ステ ハム ハ ・ コ ー ル 御 底 解説 
ae oms 
ファ ンク ショ ン : 40… ゼ ロ 書 き 込み (ゼロ ・ フ ィ ル ) を 伴う ラン ダム な 書き 込み 


CALL 手 順 
MVI も 80 ( 三 28H) 
(D, E) FCB ア ドレ ス 
CALL 0005H 
2 
(書き 込み が 正常 に 行わ れ た 場合 は A レ ジス タ に 00 が , 正常 で な い 場合 は 01 一 06 の エラ ー・ 
コー ド が 格納 され る ) 


機能 

ファ ンク ショ ン : 34 の 「 ラ ンダ ム な 書き 込み 」 と 同じ で ある が , 当 フ ァ ン クシ ョ ン は , デー タ が 実際 
に は 書き 込ま れ な い ` ホ ー ル ” (中 ぬけ ) と な る レコ ー ド も 含め て , 書き 込み の 対象 と な る プロ ッ ク の 
すべ て を 事前 に 00 で うめ て お き , そ の 上 で デー タ の 書き 込み を 行う 一 一 と いう 機能 が 追加 され て いる . 
その 他 は , ファ ンク ショ ン : 34 と 全く 同一 な の で , その 項 を 参照 . 


実習 プロ グラ ム ファ ンク ショ ン : 40 


ファ ンク ショ ン : 34 の 実習 プロ グラ ム (Figure-2.2.65) の 。 ファ ンク ショ ン : 34 の シス テム ・ コ ー 
ル の 部 分 を 。 ファ ンク ショ ン : 40 に 変え た た だ け で , そっ くり 同じ も の で す . 詳細 は ファ ンク ショ ン : 
34 の 項 を 委 照 下さ い . 

この プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト を 次 に 示し ます . 


A>TYPE 4O.PRN } 


ファ ンク ショ ン : 34 と 同一 プ ロブ ラム. [_ 部 が 異な る の み . 


FUNCTIODN 40』 MRITE RANDDNM MITH ZERD FILL 


O1OO 21004O 
O10O さ 227401 


O1O6 aF 
O107 さ 27601 
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O1OA 
O1OC 
O1OF 


0112 
0114 


0117 
O118 


O11B 
011E 
O121 


0122 
012 く 
O124 
O125 
O126 


O129 
O12A 
O12B 


O12E 
O1 さ 1 
O1 さ 2 
O135 
O1 さ 6 
O13Z 


O13A 
01 さ ヒ 


O1 さ F 
O14O 


O14 さ 
O1 45 
O1 4 日 


O14B 
O14 ビ 


014F 
O151 
O154 
0157 


O15 
O1SA 
O15D 


O16O 
O162 
O165 


O168 


OE16 
115CoO 
Cpo5oo 


FEFF 
CA4FO1 


RF 
さき 27FOO 


218ooo 
さ 37601 
4F 


71 
2 さ 
7D 
BZ 
C222O1 


QOC 
79 
さ 27601 


274O1 


FEFF 
CASBO1 


2 さ 
227401 


OE28 
115COO 
CDO5OQ 


BZ 
CA1BO1 


OEO9 
116801 
CDOS5OO 
C9 


OE1O 
115COO 
CDOSOQO 


FEFF 
CA4FO1 
CSoooo 


MVI ンー ティ 
LXI D,FCB 
CALL OOOSH 
CPI 255 
JZ ERROR 
XRA 人 
STA FCB+ さ 5 
NXTREC ョ 
LXI H。 日 OH 
LDa MTPATTN 
MOV C,a 
BUFLOOPs 
MOV NM,。C 
INX H 
MV A。 し 
ORA 谷 
JNZ BUFLOOP 
INR C 
MOV A。C 
STA MTPATTN 
PUTROR1 s 
LHLD BETADR 
MOV A。M 
STA FCB+ さ さ 
INX ー 
MOV a。M 
STA FCB+ さ 4 
CPI OFFH 
JZ CLOSE 
INX H 
SHLD GETADR 
- ご こ が 異 な る だ け . 
LXi D,FCB 
CALL OOO5H 
DRA Aa 
JZ NXTREC 
ERROR 』 
MVI C。 の 
LXI D,MSGERR 
CALL OOo5H 
RET 
CLOSE* 
MVI C。16 
LX1 D,FCB 
CALL OOOSH 
CPI 255 
dZ ERRUR 
JMP Oooo 


ODOn455252 MSBERR』 DB 


QODH,OAH。" ERROR !" 。ODH。 OH 。" 生 " 


シス テム ・ コ ー ル 徹 底 実習 
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全 シ ステ ハム ・ コ ー ル 徹底 解説 


0174 BETADRi DS 2 
O176 MTPATTNi DS 1 
O177 END 

谷 > 


Figure-2.2.78 ファ ンク ショ ン :40 実習 プロ グラ ム の PRN 形 式 の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト か ら ア セン ブリ ・ ソ ー ス ・ フ ァイル を 作り , アセ ンプ ル し , “40 . COM” を 生成 
し て 実行 し て み ま し ょ う ). 
ファ ンク ショ ン : 40 実習 プロ グラ ム の 実行 


当 プ ログ ラム の 実行 方 法 と 実行 結果 は , ファ ンク ショ ン : 34 と 同じ で す . た だ し , 実際 の デー タ が 
書き 込ま れ て いる レコ ー ド 以外 の プロ ッ ク に は , すべ て に 00 が 書き 込ま れ て いる は ず で す . 
実行 例 を 決 に 示し ます . 


ラン ダム ・ レ コー ド 番 号 表 を アド レス 4000H か ら ロ ー ド . 


へ C -…CP/M に 戻る . 


A>40_Bz TEST40。RND ) ドラ イブ B : 上 に , ラン ダム ・ フ ァイル *TEST40 .RND” を 作る . 


人 > 


Figure-2.2.79 ファ ンク ショ ン :40 実習 プロ グラ ム の 実行 . 


実行 が 終わ り ,、 ラン ダム ・ フ ァイル “TEST40 . RND” が 作ら れ ま し た . デー タ が 書き 込ま れ て い 
な い 部 分 に 00 が 書か れ て いる か どう か 確認 し て み ま し ょ う . 

ファ ンク ショ ン : 34 の 項 の Figure-2.2.72 を 参照 し て 下さ い . この 表 の ^TEST . RND” の 部 分 が , 
今回 の “TEST40 . RND” の 部 分 で す . この トラ ッ ク 02 の セク タ 17 か ら , トラ ッ ク 00 の セク タ 16 ( デ 
ー タ の 書き 込み が 行わ れ た の は , セク タ 12 ま で で ある が , プロ ッ ク 単 位 で は セク タ 16 ま で ) ま で の “中 
ぬけ ? の 部 分 を セク タ ・ ダ ンプ ・ プ ログ ラム て で 調べ た 結果 . すべ て に 00 が 記録 され て いま し た . 

その ファ イル の 最終 プロ ッ ク の セク タ ・ ダ ンプ を 次 に 示し ます . 


1 4 


シス テム ・ コ ー ル 徹底 実習 


ご れ 以 前 で , デー タ ガ が ガ 書き 込ま ね て いな い , すべ て の ブロ ッ ク に は , 
00 が 塞 か が れ て いる . 


ご の よう に 00 が 書 ガ ね て いる . 


DISK=B TRACK=O4 SECTOR=16 
BiOO QO oO oO OO 0O 
Bi1O oO OO 00 
Bi 20 0Q 00 00 0QO 
Bi さ O 00 00 00 0O 
Bi 40 oO OO OO QO 
Bi SO oO GO oO oO 
Bi eo Qoo OO OO oO 
oo oO OO OoQ 


QO OO COOL は すき 
QO 0O POCKETIESEESS] 
QO QO に 生生 

OO OO 

oO oO 

Qoo Qoo 

QO OoO OO 
oO OO OO 


oO 
00 0O 
00 00 
00 0O 
QooO 0O 
oO oO 
oO oo 
oo OO 


88888888 
88888888 


Bs 7O 


DISK=B TRACK=O4 。 SECTOR=17 
Bioo FF FF FF FF FF 
Bi1o FF FF FF FF FF 
Bs 2O FF FF FF FF FF 

Bi SO FF FF FF FF FF 

Bi 4O FF FF FF FF FF 

BsS5o FF FF FF FF 

Bi eo FF FF FF FF FF 

Bi7o FF FF FF FF FF FF FF 


で - フォ ー マ ッ トレ だ まま の , 全く が 付け られ ね て いな い エ リア . 
ロ (PC-8031 ミ ニ デ ィ ス フ は ^FF" で イニ シャ ライ ズ さ れる ) 


Figure-2.2.80 ファ ンク ショ ン :40 に よる 00 の 書き 込み の 確認 . 


ラン ダム ・ ア クセ ス に 関し て は , スキ ュー・ フ ァ ク タ の な い PC-8001 CP/M を 使っ て , セク タ 番 
号 と の 関連 を 理解 し 易い よう 配慮 し まし た が , スキ ュー を 持つ CPM で は , それ ぞ れ の スキ ュー・ フ 
ァ ク タ で セク タ 夕 番号 が 変換 され て いま す の で 換算 し な けれ ば な り ま せん . ご 注意 下さ い . 


2.3 ラン ダム ・ ア クセ ス に よる 検索 プロ グラ ム の 作成 


今 ま で 解説 を 行っ て きた “シス テム ・ コ ー ル ” を 総合 する 意味 で 。 ラン ダム ・ ア クセ ス を 利用 し た , 
電子 早 見 帳 * と で も 言う べき , 検索 プロ グラ ム を 作っ て み ま し ょ う . 

ここ で 紹介 する プロ グラ ム は , 筆者 が 「 応 用 CPM」 向け に , 学習 用 と し て で きる だ け 簡 素 に デザ 
イン し た も の で あり , 内 容 は , "電子 早見 帳 ? と し て の 骨子 に 近い 基本 的 な 機能 を 持っ て いる に 過ぎ ま 
せん . し か し , この よう な プロ グラ ム で も , それ を 作成 する に は , CPM に 関す る 広い 知識 と 実際 に 
CPM を 操作 し て 開発 を 行う 経験 が 必要 で し ょ う . この 2. 3 章 は , 言 ち ば CP ン M 全 般 の 基礎 講座 の 
卒業 制作 の よう な も の で す . 


2.3.1 プロ グラ ム の 仕様 


* プロ グラ ム 名 …… 電 子 早見 帳 . 
対象 機種 ………… すべ て の CP ノ M マ シン . 
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人 至 シ ステ ハム ・ コ ー ル 徹底 解説 


@ 機能 で すす イ ジア デ ッ グズ (見 出し ) だ Le。 アル ファ ベッ 了 s 数 字 , 記号 。 カナ な どの 1 
文字 を 指定 する と , それ に 対応 する 項目 の デー タ が スク リー ン に 表示 され る . 
項目 デー タ の 入力 は , イン デック ス の 1 文字 を 指定 し た 後 , 続け て その デー タ 
を 入力 する こと に より 行わ れる . 

@ 収容 可能 項目 数 …42 項 目 

@ 1 項目 当り の 文字 数 …128 文 字 以 内 


仕様 は 。 上 記 の よう な も の で す . 
各 項 目 の 構成 は , 文字 また は 記号 の 1 文字 と 128 文 字 以 内 の 自由 な エリ ア か ら 成 っ て いま す . 図 で 示 
す と 決 の よう に な り ま す . 


開講 ヴ グ の 


GBSIOM2esnnroe | 項目 の 構成 


Figure-2.3.1 1 項目 内 の デー タ 並 び 


128 文字 の 自由 な エリ ア 


電子 早見 帳 プ ログ ラム の 考え 方 
当 プ ログ ラム の アル ゴリ ズム を 図 で 解説 し まし ょ う . 


当 プ ログ ラム の マッ プ ・ エ リア は , | レコ ー ド の み で ある . 
マッ プ 部 の イン デック ス に 続く レコ ー ド FNo. に よっ て , デー タ 部 が ラン ダム ・ リ ー ド プラ イト され る . 


当 プ ログ ラム で 作ら れる , 
デー タ 0 に 4 ご ラン ダム ・ デ ー タ ・ フ ァ イ 
ラテ ゴル デー タ 部 ( | レコ ー ド に | 項目 が ラン ダム に セー プ さ れ て いる ) ーー ル の 最大 は 42 レ コー ド (42 
項目 ) で ある 
1 ik 1 レコード 
(それ ぞ れ の レコ ー ド は |I28 バ イト で あり , | つの 項目 を 構成 する ) 


| 3 バイ ト で | つの 項目 を 指し 示す . 


イン デック ス 
・ バ イト | 
1 レコ ー ド # 


例え ば と し て Figure-2.3.2 ヾ 電子 早見 帳 */ の アル ゴリ ズム の 図示 
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ラン ダム ・ ア クセ ス に よる 検索 プロ ブラ ム の 作成 


マッ プ の 初期 設定 


マッ プ 部 は ファ イル の 先頭 に あり , 3 バイ ト 単 位 で 1 つの 項目 を 指示 し て いま す . 3 バイ ト の 内 の 
最初 の バイ ト は , イン デック ス と な る キー ワー ド 1 文字 が 格納 され , 続く 2 バイ ト に は その デー タ が 
格納 され る (セク タ の ) ラン ダム ・ レ コー ド No が 格納 され ます . 

マッ プ 部 は , 新しく デー タ ・ フ ァイル を 作成 する 場合 に , 事前 に 必ず 行わ な けれ ば な ら な い “初期 
設定 ” (N コ マン ド ) で , あら か じ め 次 の 図 に 志す よう に 各 項 目 の レ コー ド No が 書き 込ま れ ま す . 


マッ プ 部 
最初 の 3 バイ ト 


琶 倒 
マ ママ 


倒 
ママ 


倒 
ご 


引 
マ 


) ト e 


Figure-2.3.3 初期 設定 後 の マ ッ プ 部 


この よう に , 3 バイ ト 単 位 の 各 項 目 の イ ン デ ックス 部 に は , すべ て に FFH が 書き 込ま れ , それ に 対 
応 す る レコ ー ド No 部 に は あら か じ め , 0001, 0002, 0003…… と , レコ ー ド No が 順番 に 書き 込ま れ ま す . 
当 プ ログ ラム で は , マッ プ 部 が わずか 1 レコ ー ド な の で 次 の レコ ー ド , つま り デ ー タ 部 の 最初 の ラン 
ダム ・ レ コー ド No は , 0001 と な り ま す . も し , マッ プ 部 が n レ コー ド を 使用 する な ら ば , デー タ 部 の 
最初 の ラン ダム ・ レ コー ド No は , n 十 1 と な り ま す (この レコ ー ド No の 算出 は 、 ファ ンク ショ ン : 36 
で 行い ます ). 

イン デック ス 部 に FFH が 書か て て いる と , その 項目 以後 の データ は , “ 未 記入 ” と みな され ます . 

この よう を な 初期 状態 の マッ プ 部 が , ファ イル と し て ディ スク 上 に 作ら れ , “初期 設定 "の 作業 が 終わ 
る と, 以後 の アデ ア ィ スク ・ ア クセ ス は , この マッ プ に 従っ て ラン ダム に アク セス され , デー タ の 書き 込 
み , 読み 出し が 行わ れ ま す . 


デー タ の 書き 込み 


デー タ の 書き 込み モー ド (1I コマ ンド ) に する と , 該当 ファ イル が オー プン され , その マッ プ 部 が 
デフ ォ ル ト の DMA バ ッ フ ァ (80H-FFH) に 読み 込ま れ ま す . 

プロ グラ ム は 次 に , メモ リ 上 に 読み 込ま れ た マッ プ 部 の 各 イ ン デ ックス を サー チレ し , FEFH の イン デ 
ックス を 見 つけ ます . その レコ ー ド No が , 次 に 書き 込み を 行う 項目 に 当たり ます . 


全 シ ステ ム ・ コ ー ル 徹底 解説 


次 は , 項目 の 頭 文 字 を 1 文字 キー 入力 し ます . 入力 され た 1 文字 は , マッ プ 部 の 先程 の イン デック 
ス の FFH で あっ た 部 分 に 書き 込ま れ ま す . 

項目 の 頭 文 字 を , メモ リ 上 の マッ プ 部 の イン デック ス ・ ポ イン ト に 書き 込む と , 次 は デー タ の 入力 
で す 、 

各 項 目 の デ ー タ の 文字 数 は , 改行 な ども 含め て 127 文 字 以 下 で な く て は な り ま せん . キー 入力 され た 
デー タ は , 当 プ ログ ラム の 最終 部 に ある 2nd DMA バ ッ フ ァ に 格納 され て 行き ます . 

デー タ の 入力 の 終わ り を 示す Ctrl-Z を 入力 する と , 2nd DMA バ ッ フ ァ の 内 容 が , 先程 , 頭 文字 を 
書き 込ん を だ イン デック ス に 続く 2 バイ ト が 示す レコ ー ド No に 書き 込ま れ ま す . デ ー タ 部 は この よう に ., 
入力 が 終わ る と 同時 に ディ スク に 書き 込ま れ ま す が , 新しい マッ プ 部 は , この 時 点 で は まだ ディ スク 
に は 書き 込ま れ て いま せん . マッ プ 部 の ディ スク へ の セー ブ ( つ まり , ディ スク 上 の マッ プ 部 の 更新 ) 
は , 終了 コマ ンド で ある E コ マン ド を 実行 する こと に より 行わ れ ま す . 


デー タ の 表示 


S コ マン ド を キー イン する こと に より , デー タ の サー チ と 表示 の モー ド に な り ま す . ファ イル を オ 
ー プ ン し , マッ プ 部 を メモ リ 上 に 読み 出し て 目的 の イン デック ス を サー チ す る 動作 は , デー タ の 入力 
の 場合 と 同じ で す . ファ イル が すでに オー プン され て いる 場合 は ,、 オー プン の 動作 は スキ ッ プ され ま 
す 。 

サー チ し た い 項 目 の イ ン デ ックス (1 文字) を キー 入力 する と, 前 記 と 同様 に 。 メモ リ 上 の マッ プ 
部 を サー チ し て 発見 し た イン デック ス に 対す る レコ ー ド No を 取り 出し ます . そし て , その レコ ー ド を 
ラン ダグ ダム ・ リ ー ド し , その 内 容 を コン ソー ル に 表示 し ます . 


プロ グラ ム の 終了 


E コ マン ド の キー イン に より , 当 プ ログ ラム を 終了 し CPM に 戻り ます . も し , マッ プ 部 の 変更 が 
あっ た 場合 は , ディ スク 上 の 古い マッ プ 部 を 新しい マッ プ 部 に 書き 替え ます . 変更 が な か っ た 場合 は , 
何 も 行 わ ず に CPM に 戻り ます . 


当 プ ログ ラム の 目的 は 。 シス テム ・ コ ー ル の 総合 的 な 応用 と し て , ラン ダム ・ フ ァイル の 人 科 単 な 応 


用 例 を 実習 する こと に あり ます . よっ て , プロ グラ ム が 複雑 に な る こと を 避け る た め , 基本 的 な 機能 
し か 持た せ て いま せん の で , 当 プ ログ ラム の 実行 に は , 次 の 点 に 注意 し て 下さ い . 


O デ ィ ス ク 上 に すでに 存在 する ファ イル 名 で , 新 フ ァイル の 作成 コマ ンド (N コ マン ド ) を 実行 す 
る と , 同時 に 同名 ファ イル が 作ら れ て し まい ます . 


152 


ラン ダム ・ ア フク セス に よる 検索 プロ ブラ ム の 作成 


O ミ スタ イプ を 町 正す る こと は で きま せん 。 一 発 勝負 で す . 

oO すでに 入力 され て いる デー タ の 削除 ・ 変 更 な ど は で きま せん . 

Oo 同じ イン デック ス を 入力 し た 場合 は , 最初 に 入力 し た も の が 読み 出さ れ ま す . 

O 項 目 数 は , た っ た の 42 項 目 し か 収容 で きま せん . 項目 数 の 制限 を 超え て も 警告 は 出 ま せん , 暴走 
する こと に な る で し ょ う . また , 一 項目 の 最大 の 文字 数 127 文 字 に つい て も 同様 で す . た だ し , こ 
れ に つい て は 127 文 字 を 超え て も 暴走 する こと は あり ませ ん . 


も ちろ ん , これ ら の 点 を クリ ア す る こと や , 使い 勝手 を 良く する こと は , 実用 プロ グラ ム と し て は 
不可 欠 の こと で す が , ここ で は 基本 的 な 構成 が それ ら に よっ て 見 えな く な っ て は 意味 が あり ませ ん 
の で 我慢 し て 下さ い . 

次 に 当 “電子 早見 帳 "” プロ グラ ム の フロ ー チ ャ ー ト を 示し ます . 


当 プ ログ ラム の 起動 


。  RNDFILE_x : flename. ext 
ロー カル ・ ス タッ クエ リア の 設定 各 フ ラグ の イニ シャ ライ ズ 


コマ ンド 選択 


ファ イル の 作成 
ファ ンク ショ ン : 22 


DMA バ ッ フ ァ を 
FFH で フィ ル 


ファ イル の オー プン 
マッ プ 部 の リー ド 


クロ ー ズ 必要 フラ グ の セッ ト 
末 記 入 イ ン デ ックス の サー チ 


末 記 入 エ リア あり ? 


ファ イル の オー プン 
マッ プ 部 の リー ド 


ディ スク に セー ブ 
(シー ケン シャ ル ) 


イン デック ス の 入力 を 
促す メッ セー ジ の 出力 


入力 文字 を マッ プ か ら サ ー チ 
その レコ ー ド # の 取り 出し 


続く ラン ダム ・ レ コー ド # の 
セッ ト . ファ ンク ショ ン : 36 


W 測 古 落 仙 一 VH 尽 抽 


取り 出し た ラン ダム ・ 
レコ ー ド 壮 を 基 に , 各 
イン デック ス 入 力 を 促す イン デック ス に 対す る 
メッ セー ジ 出 力 レコ ー ド 斗 を , メモ リ 上 


の マッ プ 部 に 書き 込む 


メモ リ 上 の マッ プ 部 に 書き 込み 完成 し た マッ プ 部 を 
の 再び ディ スク の 同じ 
ーー あど ソ デ ィ メ ク の 


メッ セー ジ の 中 力 


デー タ の 入力 


Ctrl 一 Z の 入力 に より 終了 


Figure-2.3.4 “電子 早見 帳 * の フロ ー チ ャ ー ト 
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2.3.2 電子 早見 帳 プ ログ ラム の アセ ンプ ブリ ・ ソ ー ス ・ リ スト 


決 に , 当 プ ログ ラム (RNDFILE) の ソー ス ・ リ スト を PRN 形 式 で 示し ます . この リス ト を 基 に , 
エディ タ を 使っ て ソー ス ・ フ ァイル を 作成 し , ASM お よび LOAD を 実行 し て , “RNDFILE . COM? 
を 生成 し て 下さ い . 

Figure-2.3.4 に 示し た フロ ー チ ャ ー ト と , ソー ス ・ リ スト の 解説 用 の コメ ント を 見 な が ら 追 っ て 行 
け ば , 各部 分 が 何 を 行っ て いる か が , 理解 で きる と 思い ます . 


A>TYPE RNDF ILE.PRN / 


1111111111111111111111111111111111411t1111111111111111111 
11 1 1 
1 1 RANDDM FILE sample proqgram 3 】 
まま 

111111111111311111311113311111111111111111111113111111111 


JUNE 24 1982 by Y.MURASE 
for ABSCII Legarning SBy=tem " ビ P/ 間 さ "。 
リ 


BDOS シス テム ・ コ ー ル ・ エ ント リ ・ ポ イン ト 、. 
FCB デフ オォ ルト FCB ア ドレ ス . 
FCBRO ー デ フォ オル ト FCB の r0 フ ィ ス . 6 
DMAO ー デ フォ オル ト DMA/ パッ ソファ. ラン ダム ッ レレ コード: マッ プ 用 . 
DNMA1 ー:2nd DMA バ ッ フ ァ . デー タダ 用. 
bee いい ーー 覆 放 コード. 
QooOA LF 


は いい り BSP,STACK ーー ロー カル ・ ス タッ ツク 設定 . 

O10 さ ^aF a 

Oo104 各 フ ラブ の イニ シャ ル ・ セ ッ ト . 

0107 FL$NEEDCLS 
1 くく くく くく くく くく COMMAND SELECT >>>>>>>>>> ーー コマ ンド の 選択 モー ド 
CMNDSEL 

Fe neBBEL コマ ンド 選択 の メッ セー ジ 出力 . 

Oo11O CONIN 


949 re* | い サ ー チ "な ら ば *OSEAROH“ へ ジャ ンプ . 


で 1 * イ ン ブ プット" な ら ば *DATAIN" ヘ ジャ ンプ. 
O11D ^*NEW フ ァイル の 作成 "な ら ば 

O11F *NEWFILEY へ ジャ ンプ . 

6 に ^* プ ログ ラム の 終了 "な ら ば "EXIT* 

4 どの コマ ンド に も 当て は ま ら な い キ ー 入 力 の 
に て 場合 は . ヾ マ ” を 出力 し て 再び "CMDSEL* に 戻 


# く くく くく < くく くく く MAKE NEM FILE >>>>>>>>>> 一 新 ブフ アイ ル の 作成 。 
NEWF ITLE 


O12F OE16 MVIi C。22 


人 ーー EAT PC | メイ ン ・ コ マン ドラ イン に 書か れ だ ファ イル 


ーー CALL  BDOB [名 の ファ イル を , 新た に 作成 する . 


O1 さ 9 CA7OO2 JZ ERROR 


154 


O13C 
O1 さ F 
O141 


O1 4 さ 
O144 
0145 
O146 


O149 
O14A 
O14D 


oO1SO 
O15 さ 
O1S4 
O1S7 


0159 
O1SA 
O1SB 
O1SC 
O1SD 
OiSE 
O1SF 
OieOo 
O16 さ 


O165 
O166 
O169 
O16C 
O1eF 


O172 
O175 
O176 
O179 
O17C 
O17E 


O181 
018 さ 
0186 
0187 
O18A 
O18D 
Oo19O 
O19 さ 
Oo196 


O19Z 
019 
O19D 


O1AO 
O1A さ 
O1A4 
O1AS 
O1 人 AZ 
O1AA 
O1AC 
O1AF 
O1B1 
01B2 
O1BS 
O1B6 


PAPMTI 


INSLMAP』 


きく くく くく くく くく く 


DATAINs 


DATAIN1s 


KEYINi 


ラン ダム ・ ア クセ ス に よる 検索 プロ ブラム の 作成 


H, OOBOH 
E。 OFFH 


B。 128 

" デフ ォ ル ト の DMA パ パッ ツ フ ァ (DMA0 : 80ーF 
NM,E FFH) の 128 バ イト 全部 に "FFH" を 書き 込む . 
H 
B 
NMQPMT 


Aa FCB の *cr? フ ィ ー ル ド に 00 を セッ ト し て , 
FCB+ さ 2 DMA パ バッファ の 内 容 を , ア ディス フ に “シー ケ 
SEQwRITE | シシ ヤル な 書き 込み "で セー ブ す る . 


BETRNDRCO -- フ ラン フシ ョ ン : 36* セ ッ ト ・ ラ ンダ ム ・ レ コ 


ー ド ? を 実行 し て , 続く レコ ー ド No. を 取り 出 

H。 DMAO すず . 
B。128/3 [取り 出し だ レコ ー ド No. を 基 に , シー ケン シ 

ヤル に 書き 込ま れ た ラン ダム レコ ー ド No の マ 
H ツ プ に 続い て , ラン ダム に 読み 書き する だ め 
ME の , 各 INDEX に 対応 する レコ ー ド No. を , 
き 0 和 パッ ファ 内 の それ ぞ れ の 位置 に 書き 込 

ロ 

H MAP の 最終 に は "エン ド ・ オ プ ・ マ ッ プ ” と し 
て "1AH” を 書き 込 ふ る で お あ ぐ . 
INSLMAP 
N。 1AH 


FCBrs2 | DMAO パ ッ フ ァ の 内 容 を , 先 程 FFH を 書き 込 
ン シ ャ ヤル な 書き 込み "で 書き 込む . 
CDeEL | 終了 後 は , コ マン ド ・ セ レク ト へ 戻る . 


DATA INPUT >>>>>>>>> う ーー デー マツ の 入力 モー ド . 


対象 と する ファ イル が , すでに オー ブン され 
| て いる 場合 は , 次 を スキ ッ プ レ で *DATAIN1 ” 
pararhi | ご セ ンプ 
Et ファ イル の オー プン . レコ ー ド No. マッ プ の 
和 C 1 王 8 し Du へ の 
ファ イル フロ ー ズ の ゆめ 要 ・ 不 生 要 フラ グ に 
0 fr 


AOFFH | 本 書き 込み の INDEX LETTER の サー チ . 
BEARCH ! さ べ て 書き 込み 済 の 場合 は , コマ ンド ・ セ レ 
A クト に 戻る . 


THN LINDEXx LETTER の 入力 メッ セー ジ 出 力 
CONIN 
PT*IDAD 
W。A 


キー 入力 . 入力 され だ 文字 を , DMA0 内 の INDE 
に 裕 納 . 0 の 


es デー タ 胎 入力 の メッ セー ジ ド カ . 


CONIN | デー ツタ の 入力 . 128 文 字 以内 で ある こと . 

ui) 入力 され だ 文字 は ,2ndDMA/ パ ッ フ ァ (DMA1) 
H に 格納 され て 行 ぐ . 

1AH キャ ヤリ ッ ジ ・ リ タン を 入力 ずる と , 自動 的 に ラ 
RNDMT | イン フィ ー ド ビ を 付け , 同時 に コン ソー ル に も 
CR ライ ン フ ィ ー ド を 出力 する . 

KEYIN | Ctrl 一 Z を 入力 する と デー 入力 を 終了 し, 
ALF | 次 の *RNDWT“ へ ジャ ンプ. Ctrl-Z(1AH) も 
DL] バッ ファ に 格納 され , デー タ の 最終 を 示す ご 
eee と に な る . 


KEYIN 
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RNDMTs 
FT で CD FCScSS | 股 INDEX に 乱 する レコ ー ド No. ビ 。 
O1BF CDBoo2 CALL  RNpwRiTg(DMA1 パ ツ フ ア の 内 容 を 書き 込み 。 コマ 
O1C2 CSOAO1 JHP CDSEL 脱 ド セ レ クト に 戻る . 

3 くく くく くく くく くく DATA_ SEARCH >>>>>>>>>> ーー デー ダ の サー チ モ ー ド に . 

DSEARCHs 
OCS SABCOS LODA FLWOPEN| ファ イル ガ が すでに オー プン され て いれ ば , 次 
キー いう ー | を スキ ッ プ し て *SRCHIN" ヘ ジ ヤ ン プ . 
O1CC CD1A02 ・ CALL QPNMPRD - フ ジイル の オー プン . レコ ー ド No. マ ッ プ の 
了 H SRCHINi Ne DMA0 へ の 格納 . 

LXI D, MSGSRCH 9 

O1D2 CDBDo2 CALL 。 usSsouT | Meme に ジ ボ カ . 
OIDS CDC さ O2 CALL 。 CONIN ー- サ ー チ INDEX の キー 入力 . 
O1DB CD4CO2 CALL SEARCH | 入力 INDEX の サー チ . 該当 ラン ダム ・ レ コー ド 
O1DB さ C INR A # の 取り 出し . 見 つ ひ ら な けれ ば , コマ ンド ・ 
O1DC CAOAO1 JZ CMpBEL セレ クト に 戻る 
O1DF 227DOo SHLD FCB+ さ さ | FCB の r0.r1 プ ェ ー ル ド に レコ ー ド No. を セ 
O1E2 CDA さ O2 CALL RNDREAD 「 に 欄 縛 きれ る 。 リー ド . デー タマ は DMA 1 
O1ES 118703 LXI D,MBGCRLF | 
O1EB CDBDO2 CALL mgaour | 人 帰 ・ 改 行 を コン ソー ル に 出力 
O1EB 21B40 く LXI H, DMA1 

DATAOUT』 
OIEE 7E MOv A,M ed 
トー に と 3 | ラー プチ 人 れ て 蘭 み きれ た 内 人 (OMA1) を コ 
Oi1F1 CAOAO1 JZ CNDSEL ーー bo し 2 
よら に こ 半 の 最終 を 示す *1AH” が 来る まで 出力 
O1F7 2 さ TINX 
O1FB CSEEO1 JMP DATAnuT 

くく くく くく くく くく END。 COA ンー 

EXITsi ツ プ 部 の ア 一 
O1FB es に FL | | 引 2 ま Cp けれ その まき リブート 
O1FE し まり プー ト 
O1FF C2oooo JNZ 2 ) し て CB 7M に 戻る 
ーー 0 の r0 可 ご ゆ 計 09 
o2oe 227Doo SHLD FCB+ss 「 プ 部 の レコ ー ド No. を セッ ト . 
O209 OE1A MVI C。 26 3 に 
oO2oB 118ooo LXr D, DMAO lo ド No. マッ プ に 使用 
o2oE CDo5oo CALL BDOS 
O211 CDBOO2 CALL 。 RNDMRITE ラン ダム な 書き 込み を 実行 
O214 CD79O2 CALL CLOSE | 7 ざさ 
に で Se hp oooor! フ アイ ル を フロ ー ズ し て , リ プー ト で CPM に 戻る . 


1 くく くく く OPEN。 READ MAP AREA INTO DMAO。 SET RND REC ・>>>>> 
OPNMPRDt (ノラ イル の オー ブン . マツ プ 部 の リー ド . 次 の ラン ダム No. の セッ ト . ) 


O21A OEOF MVI C。 15 

O21C 115CoO LXI D,FCB 

O21F CDO5oo CALL BDOS 

O222 FEFF CP1 255 ファ イル の オー ブン . 

0224 CA7OO2 JZ ERROR 

O227 さ EFF MVI AA。OFFH 

O229 さ 2BCO さ STA FL$DPEN 

022C AF XRA 

022D さ 27Coo STA pgw32 | 

O23O OE14 MVi C, 2O 記 SR 
0232 115COoO LXI D。FCB に EC ド の シー ケン シャ ル 
O235 CDOSoo CALL BDQS 

O2 さ 8 BZ QRA A 

O2 さ 9 C27002 JNZ ERROR 

O2 さ C CDB7O2 CALL SETRNDRCO それ に 続く ラン ダム ・ レ コー ド No. の セッ ツ ト . 
O2 さ F aF XRA A | ラン ダム な リー ドン ライ ト に 尋 え て . 

oO24O 27Foo STA FCB+35 「 FCB の r2 フ ィ ー ル ド を 0 フリ ア . 


158 


111EO さ 
CDBDO2 
C3 さ OOQOO 


MV1 C, 26 
し LXI p。DHA1 | これ か ら の DMA バ ッ フ アァ を , 2ndDMA バ パッ フ 
CALL BDOS ア の DMA1 に 設定 . 
RET 
3 くく くく くく くく くく SEARCH INDEX LETTER >>>>>>>>>> 
SEARCHs (INDEX の サー チ ) 
NOV B,A 
LX1 H, DMAO 
NXTIDXs 
NOV a。M 
CPI 1AH 
JZ NOTF IND 
CMP B 
dZ JUST ジス マビ 
A レ ジス タマ に 格納 され て いる , サー チ の 対 銀 
INX H! INX H! INX H を DMA0/ ヾ や ソファ 内 の 各 INDEX 部 か ら 
5 ne 援 レ し 出 す . 見 つか れ ば , その INDEX の DMA 0 
JUST 内 の アド レス を *PTSDAD" に セッ ト . それ 
DI に 対応 する ラン ダム ・ レ コー ド No. を , “PT 
Pe 上 -$IDAD” に セッ ト . その INDEX が 見 つか ら 
Je mW な い 場 合 は , ヘ レジ スタ に FFH を セッ ト し て 
MOv D,M リタン. り 
XCHG 見 つか つ だ 場合 は , 00 を セッ ト し て リマ ダン. 
SHLD PM*RECC 
XRA A 
RET 
NOTF IND+s 
MV Az, OFFH 
RET 
8 くく くく くく くく くく ERROR >>>>>>>>>> (すべ て の エラ ー 娘 理 ) 
ま 
LXI DSGERR 
CALL HB8OUT : エ ラー メッ セー ジ を 出力 し , リブート し て CP。 "M に 戻る . 
JIMP QoooH 
きく くく くく くく くく < くく FILE CLOSE >>>>>>>>>> (フラ イル の ローズ) 
CLOSEs 
MVI C,。16 | 
LXI D,FCB 
CALL BDOS 
CPI 255 | フ ア イ ル の フロ ー ズ . 
JZ BRROR 
RET 
すく くく くく くく くく < く SET RANDON RECDRD >>>>>>>>>> 
SETRNDRCOr (ラン ダム ・ レ コー ド No. の セツ ト ) 
MVI きく 1 
LXi DsFCB | シー ケン シャ ヤル な リー ドン ライ ト に 続く 。 ラ 
ーー | ンタ ム ・ レ コー ド Ne. を FCB の r0,r1 フィ ー 
SHLD PMeRECO | ルド に セッ ツ ト す る 
RET 
# く くく くく くく く << く SEQUENTIAL MRITE >>>>>>>>>> (シー ケン シャ ル な 書き 込み ) 
SEQMR 1 TE 
MVI G ょ 1.、) 
LX1 D,FCB 
CALL BDOS |- ー ミ 
DRA A シー ケン シャ ル な 書き 込み . 
JNZ ERROR 」 
RET ! 
まく くく くく くく くく < くく RANDOM READ 1 RECORD >>>>>>>>>> (ラン ダム ムー・ リ ー ド ビ ) 
日 
MVI C, さ さ 
LXi D。FCB 
CALL BDOS 回 一 に 
DRA AA i ラン ダム な リー ド 、. 
JNZ ERROR 
RET ] 
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すく くく くく くく くく く RANDDM MRITE 1 RECORD >>>>>>>>>> (ラン ダム ・ ラ イト ) 


RNDMRITEs 

O2BO OE22 MVI C, さ 4 

O2B2 11S5COo LXI D,FCB 

o2BS CDO5OQ CALL BDOS に < 

O2BB BZ DRA が 1 ラン ダム な 書き 込み . 

0O2B9 C27O002 JNZ ERROR | 

O2BC ヒ 9 RET ) 
# く くく <<< MESSEGE OUT. STRING ADR ON REB.D,E >>>>> (メッ セー ジ ・ ア ウト ) 
MSBOUT 

O2BD OEO9 MVI C。? ミ ・ viz- つ き 

oz2BF Cpo5oo CALL Bpos | の ee ッ セ ー ジ を , 

O2C2 C9 RET | 2 
くく くく くく < くく CONS ロ LE INPUT。 DATA ON REB.A >>>>>>>>>> (コン ソー ル 入 力 ) 
CONINi 

O2CS ES PUSH H 

O2C4 OEO1 MV1 2 | 

Oo2C6 CDOSoQo CALL Bpos : コン ソー ル か ら 1 文 字 入力 . 

O2C9 ビュ POP H 

O2CA ヒ 9 RET 
まく くく くく くく くく < くく CONBOLE OUT.。 REG.A ロ UT >>>>>>>>>> (コン ソー ル 出 力 ) 
CONDUTs 

0O2CB ES PUSH H 

02CC OEO2 MVI 公有 | 

和 CAL 56os 人 レジ スタ の 文字 を , コ ン ソー ル に 出力 . 

O2D2 E1 POP H R 

O2D さ ビ 9 RET 


以下 メ ツ セージ 文字 列 エ リア . 
O2D4 ODOAODOAS さ MSGSELs DB CR。LF 。 CR 。 し F 。 "SELECT COHHAND" 。 CR。 し ビ 
O2EB き さ 296561 フ フ DB *) ear と h。 1)nPu モ も 。 N)ew 人 31。 E)x1i モ 。  ( /1/N/E ) ラ > 笛 7 
O さ 1E ODOn455252 MSBERRz DB CR。LF。" ERRDR ! "CR。LF。 "を" 
03 さ 2 ODOAODOA49 MSBIDXIN』 DB CR。LF。CR,。LF 。" INPUT . INDEX LETTER (1 CHARACTER) > を 
O352 ODOAODOA49 MSBDATINi DB CR,LF。CR。LF。" INPUT DATA' 。CR。LF。CR。LF 。 ">" 
0366 ODOAODOA49 MSGSRCH』 DB CR,LF,CR。LF。" INPUT SEARCH INDEX LETTER >$? 
OSB7 ODOAODOA24 MSBCRLFi DB CR,LF, CR,」LF。" 


OSBC FL* ロ PENs DS 1 1 

OSBD FLeNEEDCLSDS 1 

O さ BE PT を TDADs DS ンー 

し なさ た 90PNEEO DB っ つ コ 名 フラ グ 。 ビビ レス ボイラ う 
OS92 PHWRECCs 。 DS 2 いい w 5 り 
3 ps sz |DMA1 バ パッ ファ . ス タッフ の 各 エ リア . 
03B4 = STACK EQU を 

03B4 DNMA1i DS 128 

04 さ 4 END 


Figure-2.3.5 * 電 子 早見 帳 ” プロ グラ ム の ソー ス ・ リ スト . 


2.3.3 電子 早見 帳 プ ログ ラム の 実行 
当 プ ログ ラム を 実行 する た め の コ マン ド 形 式 を 次 に 示し ます . 
RNDFILE、.x : filename . ext 


ここ で , X : は ドラ イブ 名 (ログ イン ・ デ ィ ス ク の 場合 は 省略 で きる ), filename . ext は , 検索 を 
行 ち お りう と する デー タ ・ フ ァイル 名 , ある い は , 新しく 作成 し よう と する デー タ ・ フ ァイル 名 の こと で す . 
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新 デ ー タ ・ フ ァイル の 作成 


で は プロ グラ ム を 実行 し て み ま し ょ う . まだ デー タ ・ フ ァイル は 何 も 作 られ て いま せん の で , まず , 
~ 新 ファ イル の 作成 ” を 行い ます . 

入力 する デー タ は 。 住所 録 と か , 何 か の リス ト と か , 適当 な も の と し ます が , ここ で 示す 例 は 。 大 
抵 の 本 の 巻末 に ある “ペー ジ 索 引 ” を 利用 し まし た . 使っ た 本 は ,「The CPM handbook」 で す . 


新しく 作成 する “ペー ジ 索 引 * の デー タ ・ フ ァイル 名 を , CPMINDEX . IDX′ と し て 実行 し た 例 
を 次 に 示し ます . 


と A>RNDF ILE CPMINDEX.IDX) 新しい ファ イル "CPMINDEX。 IDX" を 作り , デー ツ を 者 き 込む 。 


SELECT CONMAND 
8) earch。 1I)nDut。 N)ew fi11e,。 E)x1it。 <〈( BB/I/ZN/E )? >N 新 フ タイ ル の 作成 コマ ンド を 実行 、 


SELECT COMMAND 
8) earch。 1I)nput。 N)ew file。 E)〉)x ふ モ 。 <《 BB/I/N/E )? >』 デー ジ の 入力 モー ド ビ を 選択. 


INPUT INDEX LETTER (1 CHARACTER) > ーー イン デック ス “A" の 項目 を 入力 . 
INPUT DATA 


>QBURT 』 101。219 


Active Umer 』 76 = 項目 *A“" の デー マタ を 入力 . 

RAppend g 1 さ 1 癌 ライ ン の 終わ り に は , CR プ LF を 入力 する こと . 
ASN 』 8B1。221 LF( 改 行 ) は Ctrl-J で 代用 で きる . 

ATTACH 』 102,212。22 く それ ぞ れ の 項目 の デー タ 容 量 は 128 パ イト 以内 . 
と 2 デー タダ の 最後 に は Ctrl-Z を 入力 する . 


SELECT COMMAND 
8S)earch。 1)nput。 N)ew fi1e。 E)xit。  ( 8/1/N/E )? > 入力 モー ド 選 択 . 


INPUT INDEX LETTER (1 CHARACTER〉) >58 イン デ ッ フ ス *S" を 入力 . 
INPUT DATA 


>SAVE 』 さ O。249 

SCHED 』 25,94。10O 

SPOOL 』 94,257 

STAT 』 67。6。259 ー 項目 YS" の デー タ を 入力 . 

SUBMIT 』 76。26 さ 

System Disket =』 1。1 さ 。2 さ 。65 

Le アス 

SELECT CDMMAND 

8S)earch。 1)nput。 N)ew fi1e。 E)xit。 ( SB/I/N/E )? > エー 入力 モー ド 選 択 . 


INPUT INDEX LETTER (1 CHARACTER) , >M イン デ ッ フ ス *M" を 入力 . 
INPUT DATA 


>Machine 1anguage : 日 1 
MBASIC 』 42 

MDS-BOO 』 191 

Memory 』 2 


ーー 項目 “M“ の デー タダ を 入力 . 


MDVECPM 』 19B。240。 24 さ 
MP/M 』 209 
へ Z 


SELECT CUMMAND y 
S)earch。 1)nput。 N)ew fi1le。 EE)x1 モ 。  ( 8/1/N/E )? > 入力 モー ド 選 択 . 
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INPUT INDEX LETTER (1 CHARACTER ) イン デックス"*D“ を 入力 . 
INPUT DATA 


>DDT 』 B6。225 
Debuqgging 3 B6 
DELETE 』 22 
Dire と ヒモ Ory = 2 さ 。61 
Disk drive i 20 
Doub1 eーdensi モ ty 』 71 
や 和 
SELECT CONMMAND 

8) earch,。 1I)nput。 N)ew file,。 E)x1t。 ( B/1/N/E )? >』 - - 入 力 モ ー ド 選択 , 


ー 項目 *D"” の デー タ を 入力 . 


INPUT INDEX LETTER (1 CHARACTER) >P イン デック フス *P" を 入力 . 
INPUT DATA 


>Parity ョ 1 さら 
Pag 呈 ゅ Ord 』 1 日 フ 


PIP 』 さ 4。40。109。249 5 wpz の テー 
Printer 』 さ 生還 


Process i 10S5 

PUTSYS 』 198 

の 汰 

SELECT COMMQAND 

S) earch。 1)nput。 N)ew fi1e。 所 )xi モ 。 ( 8/1/N/E )? >1 入力 モー ド 記 択 . 


INPUT INDEX LETTER (1 CHAKACTER) >B_ 
INPUT DATA 


>Backup 』 さ Z 

BASIC 』 26 

BDOS 』 68,182, 185, 194 

Binary i B1 ー 項目 *B" の デー タダ を 入力 . 


Boot 』 1 さ 。194 
Bootstrap 1oader 』 5 


S) earch。 1I)nput。 N)ew f11e。 E)xi モ 。  ( B/1/N/E )? >E ディ ス フ 上 の マッ プ 部 が 更新 され 
プロ グラ ム を 終了 . 


し に?2 


Figure-2.3.6 * 電 子 早見 帳 ” の 実行 . 新 デー タ ・ フ ァイル を 作成 する . 


デー タ の 検索 


いよ いよ 電子 早見 帳 の 利用 で す . 先程 作成 し た “ペー ジ 索 引 ” の デー タ ・ フ ァイル を 検索 し て み ま 
し よう 。 
実行 例 を 次 に 示し ます . 
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RA>RNDF ILE CPMINDEX. IDX / すでに デー タ ガ 書 き 込ま れ ね て いる ファ イル "CPMINDEX. IDX" 選 
対し て , 当 プ ログ ラム を 実行 . 


SELECT COMMAND 


8)earch。 1I)nput。 N)ew file。 E)xit。 ( S/I/ZN/E )? >S デー タダ の サー チ を 行う . 
INPUT SEARCEH INDEX LETTER >D_ サー チ ・ イ シン デ ッ クズ と し で ,^D“ 在 入力 


DDT 』 6。225 

Debugging 』 6 

DELETE 』 22 の 

Directory 』 2 さ 。61 = “D" に 関す る 項目 が 読み 出さ れ だ . 
Disk drive 』 20 

Doub1e-density i 71 


SELECT COMMAND 
S)earch。 1I)nput。 N)ew fi1e。 E)xi も 。 ( 5/1/N/E 
INPUT SEARCH INDEX LETTER >P インデ ッ フ ス *P" を サー チ . 


Parity 』 1 さら 6 

Password 』 1 昌 Z 

PIP 』 さ 4。40。109。249 

Printer 』 さ = “P” に 関す る 項目 が 読み 出さ れ た だ . 
Process 』 1055 

PUTSYB 』 19 日 


SELECT COMMAND 
S)earch。 1I)nput。 N)ew file。 E)xit。  〈( /I/N/E 再び デー タダ の サー チ 。 
INPUT SEARCH INDEX LETTER >M イン デック フス *M" を サー チ . 


Machine 1anguaqge 』 日 1 
MBASIC 』 42 

MDS- ヨ 0O 』 191 

NMemory 』 2 

MOVECPNM 』 198,240。24 さ 
MP/M 』 209 


ーー `M" に 関す る 項目 が 読み 出さ れ だ . 


SELECT COMMAND 
8)earch。 1)nput。 N)ew file。 E)xit。  ( BS/1I/N/E ー… 再 び デ ー タ の サー チ . 
INPUT SEARCH INDEX LETTER > インデ ッ フ ス *A" を サー チ . 


ABURT 』 101。219 
QActive Usmer 』 76 


Append 』 1 さ 1 ー-*A" に 関す る 項目 が 読み 出さ れ だ . 
ABM 』 日 1,221 
ATTACH = 102,212,22 さ 


SELECT CDMMAND 
8S) earch。 TI)nput。 N)ew fi1e。 EE)x ふ it 上 。  ( ヨ /1/N/E )? >E ブロ プラ ム を 終了 . 


人 > 


Figure-2.3.7 * 電 子 早見 帳 *” の 実行 . デー タ ・ フ ァイル の 検索 . 
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2.3.4 ディ スク 内 部 に お ける デー タ の 記録 状態 


ディ スク 上 に ファ イル され た デー タ が , 実際 に どの よう に 記録 きれ て いる か を 見 て み ま し ょ う . 今 
作成 し た “CPMINDEX . IDX′ の デー タ ・ フ ァイル (6 項目 の み 入力 され て いる ) の マッ プ 部 と デー 
タ 部 の 最初 で ある , ~A” の 項 の レコ ー ド を セク タ ・ ダ ンプ し て 示し ます . どこ の セク タ に 格納 され て 
いる か は , ディ スク の 他 の ファ イル の 格納 状況 に より ます の で , デー タ ・ フ ァイル の マッ プ 部 か ら で 
は 捜し 出す こと は で きま せん . 


が イン デック スズ *A” イン アデ ッ クス"S" 


その レコ ー ド "| その レコ ー ド NO 未 材 き 込 み の マ ッ プ ・ エ リア . イン デック ス は *FF* で ある . 
DISK=A + TRG@CK=O さ 1 13ECTDR=11 
101 oO| 


AsOo [411 [5 ミ | Q2 QQ][4p] o< oo [44] o4 oo [5o] os oo [42] A..8..M..D..P..B 
Ai10 06 OO|FF 07 OO FF QB OO FF O9 OO FF OA OO FF OB 。。。。<・・・ーーーーーーー・ 
As2O OO FF OC OO FF OD OO FF OE OO FF OF OO FF 10O QO = に に ・-・ エ に エーーーーーー・ 
Ak さ O  FF 11 OO FF 12 0O FF 1 ミ OO FF 14 OO FF 15 00 FF  。、。。。 に <・ー ュ ーーー トーー・ 
As4O 16 OO FF 17 OO FF 1 OO FF 19 .0O FF 1 OO FF 1B  。。。。。。<< に に ・・・・ー・・ 
As5O OO FF 1C OO FF 1D OO FF 1E OO FF 1F OO FF 20 OO 。。。。 に に に よーーーーー・ ・ 
Ar6O  FF 21 OO FF 22 OO FF 2 くさ OO FF 24 OO FF 25 OO FF  。!。。、"、。 料 、、 ま 。。 ん 。。 
As7O 26 OO FF 27 OO FF 28 OO FF 29 oO FF 2 ooHAlFF し 7 2 


イン デック フス と その レコ ー ド No. を 格納 し だ マッ プ 部 の セ フ タ ・ ダ ンプ 


| 
マッ プ の 最終 を 示す マー カ 
書き 込ま れ て いる デー マツ. 


DISK=A _ TRACK=O さ SECTUR=1 ア 


ABDRT 』 101。219。 
<QCtiye User 』 Z 
6。。 ppend 5 1 さ 1。 
< 人 ASM 』 日 1。221。。A 
TTACH 』 102。212。 
20 44 45 22 さ 。..iS R/0。 DE 
2F 4E 29 さ F 24 2 2Q 4E 4F LETE (Y/N) つま キネ NO 
24\24 24  T DELETED** 生 久生 久生 


未 使用 エリ ア . 


イン デック フス“A" の 項目 に 当たる レコ ー ド の セク フタ ・ ダ ンプ ブ . 


Figure-2.3.8 デー タ ・ フ ァイル の ディ スク 上 の 記録 状態 . 
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9 医 マク ロ ・ ア を セン ブラ お よび 
リン グ ク ・ ロ ー ダ に よる ソフ 人 雇 発 


MAC と (Z) SID の 使用 例 と マクロ ・ ラ イブ ラリ の 利用 法 


ここ で は , 代表 的 な アセ ンプ ラ で ある MAC”, RMAC*, MACRO-80/ の 3 種類 と , リン ク ・ 
ロー ダ の “LINK-807、。 それ に , シン ポリ ッ ク ・ イ ンス トラ クシ ョ ン ・ デ バッ カ ガ の “SID?。 い ZSID* を 
取り 上 げ , それ ぞ れ の 機能 の 概要 や , 実際 の ソフ トウ ェ ア 開 発 (8080 お よび Z80) な ど を 紹介 し ます . 

本 書 で ,、 それ ぞ れ を 詳細 に 語る こと は 不可 能 (それ ぞ れ が 厚い マニ ュ ア ル と な る ) な の で , ここ で 
紹介 する の は 機能 の 一 部 , 使い 方 の 一 例 で ある こと を お 断り し て お きま す . 


3.1 MAC と (Z)SID の 使用 例 と マク ロ ・ ラ イブ ラリ の 利用 法 


デジ タル リサ ー チ 社 の マク ロ ・ ア セン プラ で ある “MAC” は , CPM ユー ザー の 中 で は , 標準 アセ 
ンプ ラ の “ASM" 以外 で , 英 ら く 一 番 多 〈 く 使わ れ て いる アセ ンプ ラ で は な いか と 思い ます . 

例え ば , NEC の PC-8000 シ リー ズ CP プ M も , PDA-800 CPM も , 沖の if-800 CPM も , 富士 通 
の FM-8 CPM も , この MAC” を 使っ て 作ら れ て いま す . 他 の 機種 の CPM も , ほとん ど は この 
アセ ンプ ラ を 使っ て 作ら れ て いる こと で し ょ う 。 

この アセ ンプ ラ に は , 後程 解説 し ます が , CPM の シス テム ・ コ ー ル を 利用 し た 各種 サブルーチン 
が , マク ロ ・ ラ イブ ラリ と し て 提供 され て いま す . また , 1 章 で 解説 し た , CPM を 各 機 種 に イン プ 
リ メ ン ト す る 場合 に 便利 な ライ プラ リ も 提供 され て いま す . よっ て , 特に CPM を イン プリ メン ト し 
た り , CPM 上 で 実行 する 各種 ソフ ト を 開発 する ユー ザー に と っ て , 一 度 は 使わ な けれ ば な ら な いで 
あろ う 必 需 品 と 言え る で し ょ う . 

3.1.1 MAC の 機能 

MAC は , イン テル 形式 の 8080 ニ ー モ ニッ ク , お よび イン テル ・ ニ ー モ ニッ ク 拡 張 形式 の Z80 ニ ー モ 
ニッ ク を アセ ンプ ブル し , イン テル HEX 形 式 の オプ ジェ クト ・ フ ァイル と , PRN リ スト ・ フ ァイル , そ 
れ に シン ポル ・ テ ー ブ ル の リス ト ・ フ ァイル を 出力 する , マク ロ 機 能 を 持っ た アセ ンプ ラ で す . た だ 
し , リロ ケー タブ ル な オプ ジェ クト ・ コ ー ド を 出力 する 機能 は あり ませ ん . 

Z80 の アセ ンプ ブル は , アセ ンプ ブラ 本 体 に Z280 の アセ ンプ ブラ が 内 蔵 さ れ て いる 訳 で は な く , “2Z80 . LIB? 


と いう Z80 を アセ ンプ ブル する た め の ラ イブ ラリ を , マク ロ 機 能 を 使っ て 取り 込む こと に より 実現 し て い 
ます . 同様 に "18085. LIB′ に より , 8085 に も 対応 で きま す . 


3.1.2 MAC の 使い 方 実例 


マク ロ 定 義 と 定義 され た マク ロ の 使用 例 


最初 に , 代表 的 な 使い 方 の 1 つと し て , ユー ザー 独自 の 2 - 3 の マク ロ を 定義 し て , それ を 同一 プア 
ログ ラム 中 で 使用 する 簡単 な 例 を 示し ます . 
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マク ロ ・ ア セン ブラ お よび リン フク ・ ロ ー ダ に よる ソフ ト 開 発 


定義 する マク ロ は , 次 の 3 種 で す . 


マク ロ 名 機能 

ALLPUSH すべ て の レジ スタ の 退避 を 行う . 

ALLPOP ALLPUSH と 逆 に 。 すべて の レジ スタ の 復帰 を 行う . 

MSGOUT ダミ ー・ パ ラメ ー タ 部 に 記述 し た メッ セー ジ を コン ソー ル に 出力 する 。 そし て , 
メッ セー ジ の 前 後に は , 自動 的 に 復帰 ・ 改 行 を 挿入 する . 


上 記 の 3 種 の マク ロ を 定義 し て, これ ら を 利用 する プロ グラ ム を 1 つの ソー ス ・ プ ログ ラム と し て 
0 この ソー ス ・ プ ログ ラム 例 を 次 に 示し ます . ファ イル 名 の エク ステ ンション は , “ASM? 
な けれ ば な り ま せん . 


A>TYPE SMPL1MAC。ASM) マフ ロ 定 凌 と それ を 使用 し だ サン プル ・ プ ログ ラム の ソー ス ・ フ ァイル . 
ファ イル 名 の エク ステ ンション は , "ASM" で な けれ ば な ら な いい 、 


111111111111110114111131111613141111111111111111111 
1 1 MAC SAMPLE PRDBRAM 1 1 1 
11 STORED MACRD 1 
31111113111111131111 す 11111111131111111111111111111111 
ORG 1ooOH ユー ザー 独自 の マク ロ 名 を 定義 . 
きく くく くく くく くく < く MACR ロ DEFINITION >>>>>>>>>> 
So *ALLPUSH* と いう マク フロ 名 で , MACRO--ENDM 間 に 記述 され だ ステ ー ト メン ト 
PUSH PBM | を 登録 する . 
PUSH B | この 部 分 が , マク ロ 名 *ALLPUSH" と し て 登録 され る . 
PUSH D | (すべ て の レジ スタ の 選 作 ) 
PUSH H 
PP H 
POP D | 上 と 同様 に , の 凶 分 が マクロ "ALLPOP* と し て 登録 れる . 
POP B | ( づ べ て の レジ スタ の 復帰 ) 
POP PSM 
ダミ ー・ パ ラメ ー タ 
INSGOUT ]IMACRQ| MESS 
LOCAL MESBUF。MDUT 
JMP MOUT 同様 に , マ クロ 名 *MSGOUT” と し て 登 
MESBUF』 DB ODH, OAH 。 " &MES 8* 。ODH。 OnH。" ま * | 録 す る . 生き パラ メー タマ *MESS" 
MOUT* MV C。9 アキ れる 文字 列 を コン ソー ル 
LX1 D,MESBUE 「『 に 表示 する 
CaLL ooo5H H 
yS 1 
) ア ! 上 で 定義 し だ マク ロ 名 を 利用 し て , 簡単 な プロ プラム を 作る , 
くく くく くく くく くく MATN/PROGRAM !>>> ッ ッッ >>>> 直交 WS 
べ ミ 
ALLPUSH 『 を 過 違 し て 
MSGOUT 3 .THIS. 1 ーー 生ま まう メッ セー ジ を 表 
5 了 半 や 
T < 
KEN する . そし て 別 
RET | 寺 す る . と い 
4 う プ ログ ラム で 
A> 5 
Figure-3.1.1 マク ロ 定 義 と 定義 され た マク ロ の 使用 例 の サン プル ・ プ ログ ラム の ソー ス ・ フ ァイル . 
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MAC と (2Z) SID の 使用 例 と マフ ロ ・ ラ イブ ラリ の 利用 法 


次 に ソー ス ・ フ ァイル を , MAC を 使っ て アセ ンプ ブル し ます . アセ ンプ ブル を 実行 する 時 の コマ ンド ・ 
ライ ン に , アセ ンプ リ ・ パ ラメ ー タ を 付け る こと に より , アセ ンプ ハル 実行 時 の 入力 プ 出 力 フ ァイル の 
各種 の コン トロ ー ル な ど が 行え ます が , ここ で は 一 番 単純 な コマ ンド で 実行 し ます . 

アセ ンプ ブル の 実行 例 を 次 に 示し ます . 


A>NAC_SHPL1MAE) ソー ス ・ フ ァイル "SMPL1 MAC. ASM* を MAC で アセ ン ブ ル す る 、 
CP/N MACRD ASSEM 2.0 

Oo15o 

OO2H USE FACTOR 

END DF ASSEMBLY 

A> アセ ン ブ ル 終 了 . 


Figure-3.1.2 MAC に よる アセ ンプ ブル の 実行 . 


アセ ンプ ブル が 正常 に 終了 し まし た . ソー ス ・ フ ァイル “SMPL1MAC . ASM” か ら , 次 の 各 フ ァ イ 
ル が 生成 され まし た . DIR で 示し ます . その 後 で , LOAD コ マン ド に より COM” ファ イル を 生成 し , 
再び DIR で 各 フ ァイル を 確認 し て み ま し ょ う ). 


QA>DIR SMPL1MAC。*! - ア セン ブル に より 作ら れ だ 各種 ファ イル の 確認 . 
nz SMPL1MAC ASNM 』 BMPL1MQC _PRN 』 SMPL1MAC HEX 』 BMPL1MAC _SYN 
ソー ス ・ フ ァイル リス ト ・ フ ァイル HEX オ プ ジ エ クト ・ フ ァイル ! 
A>LUAD BMPL 1MAC 』 -LOAD コ マン ド で MAC で は 。 シン ポル テー ブル の ファ イル も 
COM フ ァイル に 変換 . 作ら れる . だ だ し この 例 で は メイ ンプ ブロ グ 
ラム に シン ボル を 使 つ て な い の で , ファ イ 
の ル の 内 容 は で ある . (後述 ) 
LAST ADDRESB O14F 
BYTES READ OoOSO 
RECURDS MRITTEN O1 


A>DIR SMPL1HAC。* / ……… 生 成 さ れ だ COM フ ァイル の 確 妥 . 

Ar SMPL1MAC_CON SMPL1MAC ASM 』 SPPL1MAC PRN 』 SMPL1MAC HEX 
Ai SMPL1MAC SYM 

A> 


Figure-3.1.3 MAC に よっ て 生成 され た 各 フ ァイル の 確認 と 。 LOAD コ マン ド に よる "COM" フ ァイル 
の 生成. 


以上 の 手順 で , 実行 可能 な “COM” ファ イル “SMPL1MAC . COM” が で き 上 り ま し た . 
と りあ え ず , この プロ グラ ム を 実行 し て み ま し ょ う . 


A>SMPL1MAC / サン プル ・ プ ログ ラム の 実行. 
ォ *** ネ THIG I5 MAC SAMPLE PROUGRAN 2 
END 


和 表示 され だ この 2 つの メッ セー ジ と , Figure-3.1.1 の メイ ンプ ログ ラム 部 を 比較 し て 下さ い . . 


Figure-3.1.4 サン プル ・ プ ログ ラム の 実行 . 
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マク ロ ・ ア セン ブラ お よび リン ク ・ ロ ー ザ に よる ソフ ト 開 発 


この よう に , Figure-3.1.1 の ソー ス ・ フ ァイル の メイ ンプ ログ ラム 部 に 書か れ た 2 種類 の メッ セ 
ー ジ (<> で 囲ま れ た 文字 列 ) が ,。 コン ソー ル に 表示 され て いま す . 

さて 次 に , 本 項 の 解説 で 、 最 も 重要 な リス ト と な る 当 サ ンプ ル ・ プ ログ ラム の PRN フ ァイル を 示し 
ます . “マクロ "の 概念 を , この PRN リ スト か ら 理 解す る こと が で きる で し ょ う . 

ソー ス ・ フ ァイル で ある Figure-3.1.1 の リス ト と , 次 の PRN フ ァイル の リス ト と を よく 対比 し て み 
て 下さ い . 定義 S れ た それ ぞ れ の マク ロ が , メイ ンプ ログ ラム で 使用 きれ , それ が アセ ンプ ブル され 
る こと に より ,。 どの よう に 展開 され , オプ ジェ クト ・ コ ー ド に 変換 され る か に 注目 し て 下さ い 。 


A>TYPE SNMPL1HAC。PRN ) ……PRN フ ァイル に より 展開 され だ それ ぞ れ の マフ ピロ 定義 を 見 る こと が で きる . 


3111131311 も 113111111111111111 も 11111111111131111111111113】 
3 3 MAC _ SANPLE PROGRAIN 1 は 1 


3] STORED MACRO 3 1 
111111111111113111111311131 も 1111111111111111111111111 


いい いり 


10OH 
3 くく くく くく くく くく MACRO DEFINITION >>>>>> テ >>> 
ALLPUSH MACRO 


PUSH 。 PS 
PUSH B 
PUSH p 
PUSH H 
ENDN 
ALLPOP MACRO 
POP H 
POP D マフ ロ 定義 唐 は , ソー ス ・ フ ァイル 
POP B と 同じ . 
POP PS 
ENDN 
HSBOUT MACRO MESBS 


LOCAL MESBUF 。 MOUT 
OUT 


JPNP 
MESBUFs DB ODH。 OnAH。*" &MES* 。 ODH。OAH。 "を" 
MOUTI Vi C。9 
LX1 D, MESBUF 
*+" 記 写 は , マフ ロ に over 人 Se 


よっ て 展開 され だ コー 。 
ド で ある こと を 示す . 』<<<<<<<<<< MAIN PROGRAN >>>>>>>>>> 


[ALLPUSH | 
展開 され を メイ ンプ ログ ラム 如 . 

OO mo 9 コス < "ファ イル と よく 比較 レ て 下さ い .」 
O1O02+DS PUSH D 
O10 さ +ES PUSH H 

SSOI A( 
O104+C さ さ OO1 JMP ??0002 
O107+ODOA2A2A2A?200O1』 DB ODH。 ORH。" ま まま THIS TS MAC SAMPLE PROUGRAN 2 *# ま *"。ODH。OAH。"*" 
O1 さ O+OEO9 ラウ?O0O02』 MVE C。9 
O1 さ 2+1 107O1 LXIi D。?20OO1 
O1 さ 5 き +CDO5OO CALL OOoSH 
O1 さ B+E1 POP H 
O139+D1 PP D 
O13A+C1 POP B 
O1 さ B+F 1 POP PSM 
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O1 さ ビ +C さ 4701 JMP 220004 

O1 さ F+ODOA454E44 ラ 2000 さ 』 DB ODH。 OAH。” END* 。 ODH, OnH。*" 生 * 
O147+OEO9 うっ 20OO4』 MVI 。9 

O149+1 1 さ FO1 LXT D。??OOO さ 

014C+CDOSOO CALL OOO5H 

O14F_C ラ 


っ 15o ーー ここ は マク フロ で は な い ENp 
の で `+ “記号 が な い . 
人 > 


Figure-3.1.5 サン プル ・ プ ログ ラム の PRN フ ァイル の リス ト . マク ロ の 概念 を 知る 上 で 最 重 要 . 


この サン プル ・ プ ログ ラム は , マク ロロ 定義 と その 使用 (マク ロ ・ コ ー ル と 言う ) の 最も 単純 な 例 で 
あり , 本 来 は 、 も っ と 高度 な 定義 法 や 使用 法 が あり ます . 

いずれ に し て も , よく 使わ れる よう な ルー チン を マク ロ で 定義 し て お け ば , 使う 時 に , マク ロ 名 , 
ある い は マク ロ 名 と 必要 な パラ メー タ を 記述 する だ け で 良い の で す . あと は MAC ア セン プラ が 自動 的 
に Figure-3.1.5 の よう に 展開 し て くれ ます . パラメータ を 変え て , 同じ ルー チン を 呼ぶ こと が で きる 


点 が , 普通 の サブ ルー チン と 大 きく 異な り ま す . 


マク ロ ・ ラ イプ ブラ リ の 利用 と その 使用 例 


購入 し た MAC の ディ スケ ッ ト に は , 本 体 の "MAC. COM” の 他 に , 多く の マク ロ ・ ラ イブ ラリ が 
含ま れ て いま す . その 内 容 を 記し た ファ イル , “DISK . DOC"” を タイ プア ウト し て 次 に 示し ます の で 
参考 に し て 下さ い . 


較 ^MAC" の ディ スケ ッ ト に まれ る 各種 ファ イル に つい て の 説明 文 の タイ プア ウト . 


INTER.L1B 
TREADLES.LIB 
BUTTONS. LiB 


SIMPTO.LIB 
SEQIO.LIB 


STACK.LIB 
DSTACK。LIB 


Contentss 
"MAC" Ma と FrO 谷 55 昌 mb1er 
Sample program て 〇 test MQC execCution 


imp1e macCrOs for BOBS RIM/GIM instructions 
Macro 1irary for ZBO operation code5s 
Documentation for the ZBO.LIB fi1e 


Traff ュ C 11 ロ ht in 上 er5ecCtion 11bCary (see manua1) 
し 1bFaFy Or 上 FaffiC 上 readies 
L1bFa レ ヒッ Or DeGdGS モ ian DuSh わ ut も On ロ s 


Bimple BDOS 1/ ロ Library 
Bequentia1 fi1e 1/ ロ 11bra レ ヒッ 


Simp1e stack machine 11brary 
Complete stack machine 11bra レ ry 


し 1 わし a レ ツ Or 51mD1E 日 bi 二 COmDar1SOh 〇 DEFatiOn ロ 5 
日 bi 上 ComDParieOn5 wi モ th negation 
Macros for the MHEN COn55 モ uc も (see manua1) 
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DOMHILE.L1B Macros for the DUMHILE と on も ts モビ uc も 
SELECT。LIB Macros for モ the SELECT Construct 


> 


Figure-3.1.6 "MAC" の ディ スケ ッ ト に 含ま れる 各種 ファ イル の 説明 文 の タイ プア ウト . 


これ ら の ライ ブラ リ を 利用 する こと に より , 8080, 8085, 280 の いずれ を も アセ ン ブ ル す る こと が 可 
能 と な り ま す が , まず ,. これ ら の マク ロ ・ ラ イプ ラリ の 中 か ら , シー ケン シャ ル ・ フ ァイル 1 ノ /O ラ 
イプ ラリ , “SEQIO . LIB” を 利用 し て ,. サン プル ・ プ ログ ラム を 作っ て み ま し ょ う . 

CPM の ビル トイ ン ・ コ マン ド の “TYPE” と 同等 の プロ グラ ム を 作っ て み ま し ょ う . も し , マク 
ロ ・ ラ イプ ラリ を 利用 せ ず に , この プロ グラ ム を 実現 する に は , 2. 2 章 の シス テム ・ コ ー ル の ファ ン 
クシ ョ ン : 15, 20 項 で 実習 し た プロ グラ ム を 骨子 と すれ ば 良い で し ょ う . 

し か し , この プロ グラ ム に マク ロ ・ ラ イプ ラリ を 利用 し た 場合 , どの よう な 威力 を 発揮 する か , ま 
ず そ の 実例 を 示し ます . 

*SEQIO . LIB” マク ロ ・ ラ イブ ラリ を 利用 し た , アス キー・ フ ァイル の タイ プア ウト ・ プ ログ ラム 
(プロ グラ ム 名 “TYPEOUT?) の ソー ス ・ リ スト を 示し ます . 


>TYPE TYPEOUT 。 QBSM ! 「 マ クロ ・ ラ イブ プラ リ の 利用 」 サン プル ・ プ ログ ラム の ソー ス ・ フ ァイル を タイ プア ウト . AN 


11111111111111311111111111131141111611111131111 

MAC SQAMPLE PRUGRAM 2 し 4 1 
ト す 1 ASCI 1 FILE TYPEOUT 31 
ト 111111 す 1 すす 31111111119191111161《1611《 す 121131111131 


[QACLIB SEGIO] マフ ロ ・ ラ イブ ラリ *SEQIO. IB" フ ァイル の 使用 を 宣言. 


LXI SBP 。 STACK ロー カル ・ ス タッ フク フ ポ イン 設定 . 

FILE INF ILE。 INPUTF ILE。 。 1 。 。 1024 | FILE" マク ロ の 使用 . 1sSt FCB に ある ファ イル を オー プン 
NXTBLOCKs し , 1024 パ イト の バッ ファ に 読み 出せ る よう に 準備 する . 

[GET TiNPUTFILEI ^GET? マ クロ の 使用 . "INPUTFILE*(1st FCB に ある ファ イル ) を 読み 出す . 

ゴ Z OOOOH | ・ 

CPI 1 人 AH エン ド オ ブフ ァイル で あれ ば ぱり リ ブー ト し て CP/M に 戻る . 

JZ ooooH | 

IPUT_ _ CQNI ヾ PUT* マ クロ の 使用 . “CON"( コ ン ソ ー ル ) に 出力 する . 

JMP NXTBLUCK 

DS さ 2 


STACK EQGU 生 
BUFFERS』 ご れ 以 後 は , 1024 バ イト の ファ イル 読み 出し 時 の / パ ッ フ ァ に 使用 . 
END 


| 


Figure-3.1.7 マク ロ ・ ラ イプ ラリ を 利用 し た 。 タイ プア ウト ・ プ ログ ラム の ソー ス ・ リ スト . 


1 フ 70 


MAC と (2Z)SID の 使用 倒 と マクロ ・ ラ イブ ラリ の 利用 法 


この ソー ス ・ リ スト の よう に SEQIO マ クロ ・ ラ イプ ラリ の 中 か ら , “FILE",。 GET"。 “PUT” の 3 
つ を マク ロ ・ コ ー ル する こと に より , 実に 簡素 に タイ プア ウト ・ プ ログ ラム を 実現 する こと が で きま す . 
ここ で , “FILE” マク ロ の パラ メー タ に つい て 説明 し て お きま し ょ う .。 


プロ グラ ム 内 部 で の 入力 ファ イル 名 . ここ で は | 番目 二 
ファ イル の ファ イル 名 . CB に 従っ て いる . 


当 に 名 を 付け る . 
| 還 還 自国. 四 


(マク ロ 名 ) 3 の ァイル で ある か , 出力 
ファ イル で ある か の 指定 ) ファ イル の エク ステ ンション . と es 
(て LCFCB に 全う キー 


ドラ イブ 名 . ここ で は 
省略 し て FCB に 従っ て リー ド ノ ラ イト 用 の ) いで は プロ グラ ム 中 で 指定 し て いる . 
バッ ファ ・ サ イズ の 


いる . 
Figure-3.1.8 “FILE” マク ロ の バ パラメータ 


当 プ ログ ラム で 用 いた FILE” マク ロ の パラ メー タ は , この よう に 入力 ファ イル と し て の 設定 を し 
まし た が , 例え ば も う 1 組 , アウ ト プ ッ ト ・ フ ァイル 用 の “FILE” の マク ロ ・ コ ー ル を 行い 、 プ ログ 
ラム 中 の PUT CON?” を 。*PUT OUTPUTFILE” と で も すれ ば , この プロ グラ ム は , PIP コ マ 
ンド の ファ イル ・ コ ピー の プロ グラ ム に 相当 する も の に な る 訳 で す . 

決 に ,。 この ソー ス ・ フ ァイル を MAC で アセ ンプ ブル し , LOAD コ マン ド を 実行 し て , “TYPEOUT . 
COM” を 生成 し , 実行 し て み ま し ょ う . アセ ンプ ブラ の 実行 は , Figure-3.1.2 と 同様 な の で ここ で 示す 
の は 省略 し ます . 

ライ プラ リ ・ フ ァイル の “SEQIO . LIB′ は , アセ ンプ ラ が 実行 きま れる ドラ イプ と 同一 の ドラ イブ 
上 に な けれ ば な り ま せん の で アセ ンプ ル 時 に は 注意 し て 下さ い . 

で き 上 っ た プロ グラ ム の 実行 時 の コマ ンド は , 


TYPEOUT、,x : filename. ext 』 
で す ,。 x : は ドラ イブ 名 で 。 ログ イン ・ デ ィ ス ク の 場合 は 省略 で きま す . 
次 に 実行 例 と し て , ド ライ プ B: 上 の ファ イル DUMP . ASM” を タイ プア ウト し た も の を 示し ます . 


ドラ イブ B : 上 の ファ イル , ヾ DUMP. ASM" を タイ プア ウト する . 
FILE DUMP PRUGRQAN。 READS AN INPUT FILE AND PRINTS IN HEX 


COPYRIBHT (C) 1975。 1976。 1977。 197 日 
DIGITAL RESEARCH 

BOX 579。 PACIFIC GROVE 

CALIFHRNIA,。 9 くさ 950 


1 フ 1 


マク ロ ・ ア セン プラ お よび リン ク ・ ロ ー ダ に よる ソフ ト 開 発 


ORG 1ooH 
BDOS EpU OoO5H  』DOS ENTRY POINT 
CONS EQU 1 』 READ CONSOLE 
TYPEF EQU 2 3TYPE FUNCTION 
PRINTF EQU に 4 #BUFFER PRINT ENTRY 
BRKF E ロ U 11 3 BREAK KEY FUNCTIDN (TRUE IF CHAR READY) 
DPENF EQU 15 #FILE OPEN 
READF EQU 2Q READ FUNCTION 
# 
FCB EQU SCH jFILE CONTROL BLOCK ADDRESS 
BUFF EQU BoH 』 1NPUT DIBK BUFFER ADDRESS 
ま 
1 NON BRAPHIC CHARACTERS 
CR EQU ODH 3 EQRR TAGBE RETURN 
LF EQ ロ U OAH sLINE FEED 
| 5 
ファ イル の EOF を 検出 し だ 時 点 で ファイ ル の 出力 を 絶 わる. / 


Figure-3.1.8 マク ロ ・ ラ イプ ラリ を 利用 し て 作ら れ た タイ プア ウト ・ プ ログ ラム の 実行 . 


次 に 当 プ ログ ラム で 利用 し た "FILE" マク ロ が , ファ イル 操作 上 の 各種 エラ ー 処 理 を 行う ルー チン 
を 含ん で いる こと を 実際 に 確認 し て み ま し ょ う . 


A>TYPEUUT ABCD。XYZ ) - ディ スク 上 に 存在 し な い フ ァイル の タイ ブ ア ウ ト を 行う . 
NO INPUTFILE FILE エラ ー・ メ ッ セ ー ジ が 表示 され て OP/M に 戻 つた . 


AA> 、 プロ グラ ム 中 で , 内 部 の ファ イル 名 と し て 指定 し だ 名 前 で ある こと に 注目 . 


Figure-3.1.9 ^FILE” マク ロ の エラ ー 処 理 の 確認 ファ イル が 見 つか ら な い 場 合 、 


この 他 に も , “DISK FULL"” と か , CANNOT CLOSE” と か , 各種 の エラ ー 処 理 を 勝手 に 行っ 
で くれ ます 、 

湊 に , 当 プ ログ ラム の 中 で マク ロ ・ コ ー ル し た 部 分 は , 実際 に は どの よう に 展開 され て いる の か , 
PRKN” ファ イル を グイ プア ウト し で て 見 で み ま しょう 。 
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A>TYPE_TYPEQUT.PRN / アセ ンプ ブル に より の 生成 され だ PRN フ ァイル の タイ ブ ア ウ ト -. 


マク フロ ・ ア セン プラ の 実行 に より , マク ロ ・ 
生命 プラ リ “SEQIO. LIB* か ら 展 開 さ れ だ 


1 1111《311111111111111311134111111111111?1111161 
も 1 MAC SAMPLE PRDGRANM 2 
3 1 RSCI1 FILE TYPEOUT 
ト 3331131161139311131111111111114191163113111111111 
01oO QRG 10OH 
MACLIB SEQIO 
O1OO さ 12502 LXi BSP, STACK 
FILE INF ILE , INPUTF I ょ E。 。 1 , 。 1024 
OOO1+= FTYP EQU N 
O10 さ + ビ さ OFO1 
O106+7E 
O107+12 
O10 ロ +2 さ 
O109+1 さ 
O1OA+OD 
010B+C20601 
O1QOE+ ヒ 9 
O1OF+215COO H,QTFCB+( 1 一 1 ) *16 
O112+111DO1 LXI D,FCBINPUTF ILE 
O115+OEOC MVI C。 る 3C 
O1 17+CDO6O1 CALL る DEF 
O11Q+C さ 4401 ?2000 
O11D+ 
O11D+= FCBINPUTF ILE 
O129+OO DB 
O1EF+CD4701 
-OQO1F2 CAOOOQO 
O1F5 FE1A 
O1F7 CAQOQQ 
O1FQA+F5 
O1FB+OEO2 
O1FD+SF 
O1FE+CDOSOO 
O201+F1 
O202 CSEFO1 JMP 
O205 DS さ 2 
O225 = STACK EQU 生 
BUFFERSs 
O225 
代 > トド 
Figure-3.1.10 当 プ ログ ラム の “PRN"” ファ イル の タイ プア ウト . 


分 か る . 


マク ロ が 展開 され て いる 様子 が よく 


WSA 
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Z80 の アセ ンプ ブル 例 


MAC は , 付属 し て くる マク ロ ・ ラ イブ ラリ の “Z80 . LIB” を 利用 し て , Z80 用 の ソー ス ・ フ ァイル 
を アセ ンプ ブル す る こと が で きま す . 使用 さき され る ニー モニ ッ ク は , ザイ ログ 表記 で は な く , いわ ゆる バイ 
ン テ ル 拡張 ニー モニ ッ ク ” と 呼ば れる も の で す . 

世の中 に は いろ いろ な 人 が いて , “ザイ ロク 表記 を 採用 し て いな いも の は , Z80 の アセ ンプ ブラ に あら 
ず ” と 思っ て いる 人 も いま す が , アセ モン プラ は , その 総合 的 な 機能 と 環境 こそ 第 1 に 評価 され る べき 
で あり , その 手段 で ある ニー モニ ッ ク の 表現 法 の み に 目 を 奪わ れる の は どう か と 思い ます . 筆者 も , 
ザイ ロク 表記 法 の 方 が ロジ ッ ク 的 に は 分 か り 易 いと 思い ます が , どちら に し て も 最 重要 な 問題 で は あ 
まま 選ん 。 

さて , MAC に よる Z80 の アセ ンプ ブル 例 を 示し ます . 

サン プル ・ プ ログ ラム と し て , IF~-ELSE-ENDIF の 条件 付き アセ ンプ ブル の 実習 も 兼ね て , 1 つの 
ソー ス ・ フ ァイル で , 8080, Z80 の 両方 に 対応 で きる プロ グラ ム を 作っ て み ま し ょ う ). 今回 の プロ グラ 
ム は ,、 メ モリ と CPU レジ スタ 間 の 操作 を , 8080 と Z80 の 双方 で , 同じ 内 容 の も の を 表記 し た も の で , 詳 
し く は リス ト を ご 覧 下さ い . 

その ソー ス ・ リ スト (プロ グラ ム 名 は “8080Z80?) を 次 に 示し ます . 


>TYPE_ BOBOZBO.QSM)  - スー 8080/Z80 両 用 プロ グラ ム 例 の ソー ス ・ フ ァイル の 


341113311313311111314114113314113316313111111111111911 
る 1 MAC PRUGRAN さ は 1 
4 1 BOBO & Z-O USE し 3 1 
1111311116111113111111111111111111191111111111111111 


TITLE "ーー- BOBO-ZBO SAMPLE PROBRAM ---* TITLE 填 言 に より , PRN リ スト に 


PAGE SO PRN リ スト を , 1 ペー ジ 50 行 に 設定 . タイ トル 名 が 表示 され る . 
RG 100H 
MACLIB  ZBO 280 マ フロ ・ ラ イブ ラリ の 使用 を 宙 計 . この ライ ブラ リ を 使わ な けれ ば , Z80 の アセ ン 
プル は で き な い , 
TRUE EQU OFFFFH 
FALSE EQU NT TRUE k 
zao EQU TRUE 280 用 に アセ ンプ ブル す る だ め , ご ちら を 真 と する . 
1IBOBO EQ ロ U NOT Z8O -- 反 汐 に 俺 とこ なる. 


7。B  B レ ジス タ の bit7 を 1 に する .〈Z80 用 ニモ ッ ク ) 


PSM 
人 1OOO$OOOOB 
B 


B。 人 


280 で の “SETB7, B" と 同じ こと を , 8080 で 実現 し た も の . 
PSM | 
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MAC と (Z) SID の 使用 倒 と マフ ロ ・ ラ イブ ラリ の 利用 法 


(レジ スタ に 00 を ロー ドレ だ 後 。 Dit7 を 1 に し て , アド レス 4004H に スト ア . 
ms PP 他 の レジ スタ は 変化 させない 、 
し meEcEE3 


IE 280 
LHLD OOO1H 
LDED Oo0Oe6H アド レス 0006H, 0007H の 内 容 を D, E レ ジス タ に ロー ド す る . (Z80 用 ニー モニ ツク) 


Z80 で の 上 記 2 ステ ッ プ と 同じ こと を , 8080 で 実現 し た も の . 


oooiH | 


4OO6H - -D, E レ ジス タ の 内 容 を , アド レス 4006H, 4007H に スト ア さ る. (Z80 用 ニー モニ ッ ク ) 


ELSE 
SHLD 4O001H 


| 
XCHG ! 280 で の 上 記 2 ステ ッ ブ と 同じ こと を , 8080 で 実現 し た も の . 
SHLD 4ooeH | 


(に レス 9001H 0002H の 宮 を 。 4001HL 4002HA。 アドレス 0008h 
ー 。 邊 (0007H の 内 容 を 4006H, 4007H へ コビー する . 


LXr H,3QQOH 

LXI D, 4OBOH 

LXI B, 1 28 

CALL BLKMOVE 

RET 
き くく < くく < ぐ BLOUCK MOVE SUB RODUTINE >>>>> 
BLKMOVE 


は ビー 2 の | 


LDIR HL レジ スタ で て アド レス され る メモ リ 内 容 を , B, C レ ジス タ で 示さ れる バイ ト 数 だ け , 
RET D, E レ ジス タ で アド レス され る メモ リガ から 順 に ブロック 転送 する (Z80 用 ニー モッ ク ). 


[ELsgl 

MOV A。B 

ORA C 

RZ 

Pr yu Z80 で の 上 記 2 ステ ッ プ と 同じ こと を , 8080 で 実現 し だ も の . 

INX H! INX D 

DCX B 1 5 

アド レス 3000H か ら 128 バ パイ に の デー タツ を , アド レス 4080H か ら の 

3HP BLKMoVE| (27 トビ フロ ッ フ 因 す る 。 ) 

END 
> 

出 ア 

Figure-3.1.11  Z80 の アセ ンプ ブル 例 の ソー ス ・ リ スト . 
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6 9 @ @ @ @ 6 0 9 9 6 6 9 6 6 6 6 6 90 6 9 @ 
e eo @ @e @ @e @e @e @e @e @e @e @e eo eo @e @e @e @e @e @ @ 
9 0 9 @9 @⑨ @⑥ 9 6 9 6 9 9 @⑥ @⑥ @9 9 9 6 6 6 @ @ 


Figure-3.1.12 プリ ンタ 用 紙 に タイ プア ウト され た サン プル ・ プ ログ ラム の PRN リスト. 


上 記 の ソー ス ・ フ ァイル を Figure-3.1.2 に 示し た の と 同様 に .。 MAC で アセ ンプ ル し ます . 

次 に , アセ ンプ ブル に より 生成 され た PRN フ ァイル を プリ ンタ に タイ プア ウト し て , その リス ト を 示 
し ます . “PAGE 50” の 指定 に より , 1 ペー ジ 50 行 に リス ト ・ フ ォ ー マ ッ ト さ れ て いま す . 

上 記 の PRN リス ト か ら , 条件 付き アセ ン ブ ル が , どの よう に 実行 され て いる か が 分 か り ま す . 2Z80 が 
真 , 8080 を 偽 と し て アセ ン ブ ル し た た め , 8080 用 の 部 分 が 無視 され て いま す . 

アセ ンプ ル さ れ て いる 側 の , 8080 の ニー モニ ッ ク に は な い Z80 ニ ー モ ニッ ク の 部 分 は , `Z80 . LIB/ 
マク ロ ・ ラ イプ ラリ か ら Z80 の オプ ジェ クト ・ コ ー ド が 与え られ て いま す . 

次 に , 当 項 の 主旨 で は あり ませ ん が , この サン プル ・ プ ログ ラム を 実行 し て み ま し ょ う ). 先程 の ア 
セン ブル に より HEX フ ァイル も 生成 され て いま す の で , LOAD コ マン ド を 実行 し て , “8080Z80 . COM? 
ファ イル を 作り ます . 

で は , 実行 前 準備 と プロ グラ ム の 実行 , それ に 結果 の 確認 を し た 実行 例 を 次 に 示し ます . 


A>DDT) -- DDT を 起動 . 


DDT VERS 2.2 

ーF さ OOO。 さ 10O。 5 ) アド レス 3000H-3100H に "55" を フィ ル . 

ーF4 ュ soOO) アド レス 4000Hー5000H を 0 フリ ア . あと で 確認 し 易い よう に . 
ー へ C --DDT を 終わ る . 


仙 > 
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MAC と (Z) SID の 使用 例 と マク ロ ・ ラ イブ ラリ の 利用 法 


>8BOBOZBO ) サン ブル ・ プ ログ ラム の 実行 . 
A> 
A>DDT / DDT を 起動 . 


DDT VERS 2.2 それ ぞ れ 書き 込ま ね だ デー マツ. 


D400O。 4OOF / 
40OO OO IOS_DAI OO OO QOQO QO OO OO OO OO .. レ し . . . フ . 


ー-D407O 410F/ 

4070 
40BO 
4090 
4OAO 
40BO 
40CO 
4O0DO 
40EO 


41OO QO OO OO OO OO 007 OO _Qo Oo Oo 0O OO 0O OO 0O OO ・・・・ に に ーーーーーーー・・・ 
3 プロ ッ ク 転 送 さ れ ね だ 128 パ イト の デー タ . 


Figure-3.1.13 サン プル ・ プ ログ ラム の 実行 前 の 準備 と 実行 、 それ に 結果 の 確認 . 


次 に , 参考 まで に , Figure-3.1.11 の 当 プ ログ ラム の ソー ス ・ リ スト の “2Z80 TRUE の 部 分 を , 
*Z80 FALSE” と 逆 に 書き 直し て , 再 ア セン ブル する と どう な る で し ょ う . 
その アセ ンプ ブル 後 の PRN リ スト を 次 に 示し ます . 


CPZn mecno assem zo 
cie EB 
o117 220e4o 


eiA zooso 


oOe 4 ァ 
17 gh 


oioe sloM4o 


oe 。 @e eo e @e @e e eo eo @e @e eo e eo e eo @e @e @e e @ @e 
0 9 9 9 0 6 0 0 69 9 9 9 0 0 0 9 90 69 9 9 69 @ 
9 0 9 @ 9 0 9 6 6 9 9 6 9 9 9 6 9 9 9 9 6 9 


Figure-3.1.14 先程 の も の と 条件 を 逆 に し た 場合 の アセ ンプ ル 結 果 . 


マク ロ ・ ア セン プラ お よび リン ク ・ ロ ー ダ に よる ソフ ト 開 発 


この よう に 今回 は , 8080 用 の 部 分 が アセ ンプ ブル さ れ て , Z80 用 の 部 分 が 無視 され て いま す . 
ここ で も 同じ く ,。 LOAD コ マン ド で “8080Z80 . COM” ファ イル を 作り 実行 すれ ば , 今度 は 8080 の 
オプ ジェ クト ・ コ ー ド に より , Figure-3.1.13 と 同一 の 結果 が 得 ら れ ま す . 


(人 Z8O.L1B リ 


5 3QCHK MACRUD USED FDR CHECKINB B BIT DISPLACMENTS 
日 
3CHK MACRD 2DD 3 USED FOR CHECKING RANGE DF B-BIT D1SP.S 
ITF (?DD GT 7FH) AND (2DD LT OFFBOH) 
> DISPLACEMENT RANGE ERRUR - ZBO し TB* 
ENDIF 
ENDN 
LDX MACRD ?R。?D 
SCHK ?D 
DB ODDH, ?R*B+46H。 ?D 
ENDN 
LDY MACR0 ?R。 ?D 
る ⑳CHK ?D 
DB OFDH。 ?R*B+46H。 ?D 
ENDN 
) 
LDI MACRD 
DB OEDH。 QAOH 
ENDN 
LDIR MACRQO 
DB OEDH, OBOH 
ENDN 
LDD MACRD 
DB OEDH。 OaBH 


Figure-3.1.14-。 マク ロ ・ ラ イブ ラリ は , ユー ザー が 独自 に 変更 し た り , 独自 に 開発 し た プロ グラ ム を 新 
し い ラ イプ ラリ ・ フ ァイル と し た り , 自由 に , 使い 易い よう に する こと が で きま す . 参 
考 まで に , “2Z80., LIB" マク ロ ・ ラ イプ ブラリ を グイ プア ウト し て 示し で おき ます 。 
*LDIR” は , Figure-3.1.11 に 使わ れ て いま す の で 注目 し て 下さ い . 


3.1.3 シン ボル ・ テ ー ブ ル に つい て 


MAC に よる アセ ンプ ブル の 結果 . シン ボル ・ テ ー ブ ル の ファ イル が 生成 され ます . この ファ イル は , 
後述 の SID (シン ボリ ッ ク ・ イ ンス トラ クシ ョ ン ・ デ バッ ガ ) や ZSID の シン ボル 入力 用 と し て も 使わ 
れれ ます 。 

ここ で , 2. 3 章 の “電子 早見 帳 ” の ソー ス ・ フ ァイル を MAC で アセ ンプ ブル し , 生成 され た シン ボ 
ル ・ テ ー ブ ル を 示し ます . 
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MAC と (2Z) SID の 使用 例 と マフ ロ ・ ラ イブ ラリ の 利用 法 


A>MAC_RNDFILE / 電子 早 見 帳 / の ソー ス ・ フ ァイル の アセ ンプ ブル. 


CFP/M MACRO ASSEM 2.0 
0434 

OO4H USE FACTOR 

END OF ASSEMBLY 


A>DIR RNDFILE.*W ) セン ブル の 終了 後 , 生成 され だ 各 フ ァイル の 確認 . 

に 1 うこ で RSNM FRNDFILE _ _PRN s KNDF 1 し LE HEX まき RNDFILE _ SYM 
ー ス ・ フ ァイル の 3 

谷 > s 


Figure-3.1.15 2.3 章 の “電子 早見 帳 "” の ソー ス ・ フ ァイル を MAC で アセ ンプ ブル する . 


上 記 の アセ ンプ ブル で 生成 され た シン ボル ・ テ ー ブ ル を タイ プア ウト し て 次 に 示し ます 。 
各 シ ン ボ ル は , ABC 順 に ソー ト oN Figure-2.3.5 の PRN リス ト の 各 ア ドレ ス と 比較 し て 
みて 下さ い . 


A>TYPE_RNDFILE.SYM ) - 生成 され だ シン ボル ・ テ ー ブ ル の タイ プア ウ 
3 Figure - 2.3.5 の P R N リス ト の ア ドレ ス を 参照 

BD0S O279 CLOSE O1OA CMDSEL 02C さ CONIN Q2CB CONOUT 

CR O172 DaATAIN O18B1 DATAIN1 O1EE DATAOUT OOBO DMAO 

DNMA1 O1CS DSEARCH 。  O27O_ERROR O1FB EXIT QQOSC FCB 

FCBRO O3BD FLNEEDCLS OSBC FL ロ PEN O159 INSLMAP oO2eO JUST 

KEYIN QooOa O14 さ MAPMT OS87 MSGCRLF O3 さ 52 MSBDATIN 
MSGSRCH 


MSGERR OS さ 2 O2BD MSGOUT O2D4 MSBSEL Q さ 66 

NEMF ILE Oo26D Q2SQ NXTIDX O21A OPNMPRD O39O_PMRECO 
PMRECC O3BE Q2A ミ さ RNDREAD O2BO _RNDWRITE O1B9 RNDMT 

SEARCH O296 O287 SETRNDRCO  O1CF SRCHIN OSB4 STACK 


Figure-3.1.16 生成 され た シン ポル ・ テ ー ブ ル の タイ プア ウト . 


3.1.4 SID,ZSID の 使用 例 


デジ タル リサ ー チ 社 で は , DDT よ りさ ら に 強力 な シン ボリ ッ ク ・ イ ンス トラ クシ ョ ン ・ デ バッ ガ の 
*SID*?, お よび , Z80 用 の SID で ある “ZSID” を 用 意 し て いま す . 

ここ で , ZSID を 起動 し て , 先程 の Figure-3.1.14 一 15 の MAC に よる アセ ンプ ブル で 生成 され た 電子 早 
見 帳 の `RNDFILE” プロ グラ ム の HEX オ プ ジ ェ クト ・ フ ァイル “RNDEILE . HEX” を ロー ド し , 
か つ シ ン ポ ボル ・ テ ー プ ブル も 入力 し て , シン ポリ ッ ク に デバ ッ グ を 行う こと を 想定 し て , 2 - 3 の コマ 
ンド を 実行 し て み ま し ょ う 。 
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SID, ZSID は , DDT の コマ ンド と アッ パー コン パチ ブル で す の で , も ちろ ん DDT と 同様 な コマ ンド 
の 使い 方 が で きま す が , ここ で は , シン ボル に よる コマ ンド 入力 の み を 2 ~ 3 行っ て み ま す . Figure 
-2.3.5 の “RNDEILE” の リス ト と , Figure-3.1.16 の シン ボル ・ テ ー ブ ル の リス ト と よく 比較 し て 下 
さい .。 


nA>ZSID) ZSID を 起動 . "*#" ガ ZSID の プロ ンプ ト て で て ある. 


ZSID VERS 1、4 


F FNDE ILE.HEX _RNDFILE.SYH / 1 コマ ンド で ,“RNDFILE" の HEX と SYM ファ イル を FCB に 入力 . 


R コ マン ド で メモ リ に 読み 込む 
BL シン ボル ・ テ ー ブ ル が ガ 胸 み 込ま れ だ ご と を 示す メッ セー ジ . 
NEXT PC END 
O さ BC ビ O1OO 8 昌 6F 
介し L1OO / し コマ ンド で 100H か ら 迎 セン ブル . 
O10O LD  SP。OSB4 .DN1 
O10S XOR Aa 
O104 LD (03BC .FLOPEN) ,A 
O107  LD (0SBD .FLNEEDCLS) , 


CMDSEL s - ラベ ル が 表示 され る . Mt 
っ 和 6 表示 され だ アド レス が , シン ポル の アド レス に 当 だ つて いれ ば , 
O11O CALL 0O2C さ .CONIN その シン ボル 名 を 表示 し て いる . 
O11 さ CP 5< 
O115 JP  Z,O1C5 .DSEARCH 
O11B CFP 49 
Q11Q JP 2Z,0172 .DaTAIN 


埋 L。EUNIN ) ーー 

CDNINs 
O2C さ 
O2C4 
Q2C6 
O2C9 
O2CA 

CUNOUT』 
Q2CB 
O2CC 
Q2CE 
O2CF 
O2D2 
O2D さ 


L コ マン ド て シン ボル *CONIN" ガ ら 逆 セン ブ ル 開始 . 


PUSH 
LD 
CALL 
PP 
RET 


HL 

CE。O1 

QOOS .BDOS 
HL 


PUSH 
LD 


HL 

C。O2 

LD E,A 

CALL OOOS .BDOS 
POP HL 

RET 


tD. DATAIN。 . DSEARCH ) -D コ マン ド . シン ボル *DATAIN* ガ ら *DSEARCH" ま で を ダン プ . 


O172* 
O18O* 
O19Os 
O1AOs 
O1BOI 
O1COs 


さ Q BC O さ 3 さ C CA B1 O1 CD 1 02 さ E FF 32 BD 
人 に a 和朗 い 2 

03 3E FF CD 4C 02 3C Ca OQ Oo1 11 2 Os CD BD 02 
PC 抽 : 科 導く ail RW ま ) 言う ) 
CD CS 02 2 BE 


OS 77 11 52 0 く CD BD 02 21 B4 O さ 
St 生 の Mr 宮 
CD CS 02 77 2 くさ FE 1 CA B9 O1 FE OD C2 ^aO O1 さ E 

くぎ 
oA 77 CD CB o2 2s Cs ao o1 20 92 os 22 ZD oo CD 

W | 
Bo o2 Cs QA O+ 
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RMAC の 使用 例 


埋 X ナ ーー 全 レ ジス 々 類 の 表示 . 3 KOATAN' の アド じ 記 9: 池 で 9 | 
ーーーーー AmOO B=OOOO D=OOQOO H=OOOO 5=O1OO P=O172 

ーーーーー "OO B'OOOO DOOOO H*OOOO X=OOOO Y=OOQOO LD ^a,(O さ BC .FLDPEN) 
條 へ C … ZSID を 終り CP/M へ . 


Figure-3.1.17 ZSID の 使用 例 .、 シン ポル に よる コマ ンド 入力 の 例 . 


この よう に , DDT で は 絶対 番地 で アド レス の 指定 を 行っ て いた も の が , SID, ZSID で は . symbol? 
と 書く こと に より , シン ボル 名 に よっ て , すべ て の コマ ンド の アド レス 指定 が で きま す . も ちろ ん 絶 
対 番地 で 行っ て も か まい ませ ん . 


3.2 RMAC の 使用 例 


3.2.1 RMAC の 機能 


RMAC (Relocating Macro Assembler) は , 前 項 で 紹介 し た MAC に , リロ ケー タブ ル な オプ ジェ 
クト ・ コ ー ド を 発生 する 機能 を 加え た も の で , 次 項 で 解説 する "MACRO-80" と ほとん ど 同 じ 機 能 を 
持っ て お り , モジ ュー ル 別 の 開発 や 各種 コン パイ ラ か ら , リロ ケー タブ ル ・ オ プ ジ ェ クト と の リン ク 

(後述 ) な ど が 可能 と な る アセ ンプ ラ で す . リロ ケー タブ ル ・ オ プ ジ ェ クト の 形式 は , 次 項 で 紹介 す 
る MACRO-80” と 同一 で あり , 互い に 互換 性 が あり ます . 


3.2.2 RMAC の 使い 方 実例 


RMAC に よっ て 可能 と な る , モジ ュー ル 別 マシ ン 語 開発 法 ( 1 つの プロ グラ ム を , いく つか の モジ 
ュー ル 【 部 分 〕」 に 分 け , それ ぞ れ の モジ ュー ル 上 単位 で 責任 を 持っ て 開発 し , 全部 の モジ ュー ル の 開発 
が 終わ っ た 時 点 で . それ ぞ れ を リン ク 〔 結 合 〕】 し て 1 本 の プロ グラ ム と する 開発 法 ) の 紹介 は , 次 項 
の “MACRO-80” の 項 で 行い ます の で , その 解説 は ここ で は 省略 し ます (MACRO-80 と ほとん ど 同 
機能 な の で ). 

RMAC の 実行 例 と し て は , 次 項 の "モジ ュー ル 別 マシ ン 語 開発 法 ” で 実習 する モジ ュー ル の 1 つ を , 
この RMAC を 使っ て アセ ンプ ブル し , 他 の モジ ュー ル は , 次 項 で 行っ た まま (MACRO-80 で アセ ンプ ブル 
し た も の ) の も の を 使い 全体 を リン ク し て プロ グラ ム を 完成 さき せ て み ま し ょ う . 

た だ し , これ ら の 解説 は , 次 の 「MACRO-80」 の 項 を 先 に 読ま な けれ ば 理解 し に くい の で , まず は 
次 項 に ジャ ンプ し て , それ か ら こ こ に 帰っ て 来 て 下さ い . 
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アセ ンプ ラ の 実行 と リン ク の 実行 例 


決 項 , 3 . 3 章 で の 実習 プロ グラ ム て で 使用 し た 3 つの モジ ュー ル の 内 , 最後 の モジ ュー ル "MODUL2? 
を RMAC を 使っ て アセ ン ブ ル し , 次 項 と 同様 に リン ク を 行い 。 RMAC と MACR-80 に より 生成 され る 
リロ ケー タプ ブル ・ オ プ ジ ェ クト が , 同一 形式 で あり , 互換 性 が ある こと を 確認 し て み ま し ょ う . 
RMAC に よっ て アセ ンプ ブル され る ソー ス ・ フ ァイル は , その ファ イル 名 の エク ステ ンション が MAC 
と 同じ く “ASM” で な けれ ば な り ま せん (MACRO-80 で は MAC”). 

よっ て , まず 最後 の モジ ュー ル の ソー ス ・ フ ァイル 名 "MODUL2 . MAC” を "MODULX . ASM? 
と で も リネ ー ム し て お いて 下さ い . 他 の モジ ュー ル は その まま の 状態 に し て お きま す . 

アセ ンプ ブル の 実行 で は , “MODULX . ASM” を “RMAC に より アセ ンプ ブル し ます . この モジ ュー 
ル は 。 メッ セー ジ 用 の 文字 列 フ ァイル な の で , 8080, Z80 に は 関係 な く , Z80 の ライ ブラ リ を 使用 する 
必要 は あり ませ ん . 
アセ ンプ ラ の 実行 例 を 次 に 示し ます . 


A>RMAC_MODULX / ソー ス ・ フ ァイル "MODULX. ASM“ を アセ ン ブ ル . Ga 
オプ ショ ン の アセ ン ブ ル ・ パラ メー タ を 付け な い 基 本 的 お アセンブル を 全う 。 


CP/IN RMAC ASSEM 1。1 
Q06 晶 

O00H USE FACTOR 
END OF ASSEMBLY 


AA> アセ ンプ ブル の 終了 . 


Figure-3.2.1 RMAC に よる アセ ンプ ブル 実行 例 . 


アセ ンプ ブル が 無事 に 終了 し て いま す . ア セン ブル に より , ど の よう な ファ イル が 生成 され た か を DIR 
ほ よ り 決 に 示し ます . 


A>DIR MODULX。* リ -RMAC に よ つ て 生成 され だ 各種 フラ ァイル の 確認 . 


Rs MHDULX PRN 』 MODULX ASM : MODULX 


リス ト ・ フ ァイル ソー ス ・ フ ァイル リロ ケー タブ プル ・ シン ボル ・ テ ー ブ ル 
> オプ ジェ フト ・ フ ァイル ファ イル 


Figure-3.2.2 RMAC に より 生成 され た 各種 ファ イル の 確認 . 
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生成 され た ファ イル に は , MAC で 生成 され る "HEX” フ ァイル は な く 〈, 代わ り に "REL′ と "SYM/ 
の 両 フ ァイル が 生成 され て いま す . “REL” は リロ ケー タブ プル ・ オ プ ジ ェ クト , “SYM′” は シン ボル ・ 
テー ブル の 意味 で す . 

次 に , シン ポル ・ テ ー ブ ル の “MODULX . SYM” を タイ プア ウト し て 次 に 示し ます . 


A>TYPE MODULX.SYM ) シン ボル ・ テ ー ブ ル の リス ト ア ウト . 


OOQD CR OOOA LF OO さ 7 MSBAFT OOOO MSBINP OO1F MSGMNG 
OOS5O MSBNIT 


人 > 


Figure-3.2.3 RMAC に より 生成 され た シン ボル ・ テ ー プ ル . 


それ ぞ れ の シン ボル の 相対 アド レス は , 次 に 示す “MODULX . PRN” リス ト 上 の も の と 同じ で す . 


FUEILLIC MSGINF', MSBMNG 。 MSGQAFT , SBNIT 


OOOD = CR oODH 
OOO = だ ORH 


QOOQO_ODOR4R4559 MSGINF: CR。LF。"KEY INPUT ( M/ al/ NN)D2 。 > も 
OO1F QODOA4B4S54C MSBMNG* CR。LF。"HELLOD BOOD_ MORNING 。ER。LF。"" 
OO37 QDOA4B4920 MSGBQFT* ER。LF。"HI ! GUOD QFTERNHON' 。 ER。LF 。「 加 " 
OOSO_QDOA474F4F MSBNITs CR。LF。′ GUOD NIGHT BYE-BYE' 。CR。LF。" 征 7 


Q06B 


Figure-3.2.4 RMAC に より 生成 され た “MODULX . PRN" の リス ト ア ウト . 


PRN リス ト の ペー ジ 割 り は , MAC と 同様 。 “TITLE” や “PAGE” の 指定 に より 行わ れ ま す . 

アセ ンプ ブル に 際 し て の 各種 ファ イル の 入力 先 や , 出力 先 , それ に 出力 リス ト の 形式 や 内 容 の 指定 な 
ど は , Figure-3.2.1 の コマ ンド ・ ラ イン の 後に , 『 ア セン ブル ・ パ パラメータ? を 付け て 実行 する こと に 
より , MAC と 同様 。 い ろ い ろ な コン トロ ー ル を 行う こと が で きま す が , ここ で は 何 も 付 けず , 最も 基 
本 的 な アセ ン ブ ル を 行い まし た . 


リン ク 
RMAC に よっ て 生成 され た , 最後 の モジ ュー ル の リロ ケー タブ ル ・ オ プシ ェクト ・ フ ァイル を , 深 
項 の 実習 で すでに 生成 され て いる 他 の モジ ュー ル と リン ク し , 1 本 の プロ グラ ム に し まし ょ う . 
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RMAC に は LINK. COM" と いう リン カ が 付属 し て いま す が , ここ で は び L80* を 使い ます . 


RMAC で 
アセ ンプ ブル 
し た も の 

KO) @ ③ @ 


1 
QA>LBO MAIN MODUL1 MODULX MAINX/E/N / 実生 L80 の 実行 . ④, の 4 sg 
beossSY と 1 ル を 生成 する . 


Link-BO さ 。4 さ 14-Apr- 日 1 Copyright (と c) 19 日 1 Mi と COsof セ 


Data Oo1oQo O1A7 く 167> … 生 成 さ れ だ 純 マ シン ・ コ ー ド は , アド レス 100H-1A7H に ロー ド さ れる 
167 バ イト の 容量 で ある こと を 示し て いる . 


さ 2596 Bytes Frge -… 残 つて いる 使用 可能 メモ リ 容 量 ( こ の 仙 は CP/M の サイ ズ に よ つ て 異な る ). 
EQOQOO O1a7 

洲 れ に 析 は 2 ・ コ ー ド の ベー ジ 数 (1 ペー ジ は 256 バ イト ). 
nA>DIR MAINX。*) 生成 され だ COM フ ァイル の 確認 . 

Ai MAINX CO ファ イル 名 "MAINX" の COM フ ァイル が 生成 され て いる . 


AA> 


Figure-3.2.5 RMAC で アセ ンプ ブル し た モジ ュー ル を , 他 の モジ ュー ル と リン ク す る リン カ の 実行 . 


これ で 最終 的 な 実行 可能 の オプ ジェ クト ・ フ ァイル , MAINX . COM” が で き 上 り ま し た . さっ そ 
《 く この プロ グラ ム を 実行 し て み ま し ょ う . た だ し , この プロ グラ ム は , Z80 用 に 書か れ て いま す の て で 
8080 や 8085 を 使っ た マシ ン の 場合 に は , ソー ス ・ フ ァイル の 変更 が 必要 で す . 

で き 上 っ た プロ グラ ム の 実行 例 を 次 に 示し ます . 


A>MAINX) 完成 し と プロ ブラ ム の 実行. 


KEY INPUT (M/A/ZN)? 
HELLD BOD MORNING 


KEY INPUT (NM/ZA/ZN)? 
HI ! GUUD AFTERNDON 


KEY INPUT (NM/A/N)? 
BOOD NIGHT BYE-BYE 


KEY INPUT (NM /A/N)? >”Z Ctrl-Z の キー イン に より プロ グラ ム を 
終了 し て CP/M に 戻る . 


仙 > 


Figure-3.2.6 リン ク に より 完成 し た プロ グラ ム の 実行 . 


1 コロ 4 


MACRO-80 に よる モジ ユー ル 別 ソフ ト 開 発 法 と LINK-80 


3.3 MACRO-80 に よる モジ ュー ル 別 ソフ ト 開 発 法 と LINK-80 


3.3.1 モジ ュー ル 別 ソフ ト 開 発 法 と は 


ソフ トウ ェ ア の 開発 に お いて 大 き な シ ステ ム の 開発 に な る と , CPM に 付属 し て いる “ASM” や , 
前 述 の MAC” な どの アプ ソリ ュー ト な アセ ンプ ブラ (絶対 番地 の オプ ジェ クト ・ コ ー ド を 生成 する ア 
セン プ ブラ) で は , 能率 の 良い 開発 を 行う こと が 困難 と な り , 今 か ら 解 説 を 行う MACRO-80” や 前 述 
の “RMAC” な どの リロ ケー タプ ブル な アセ ンプ ラ (リロ ケー タプ ル な オプ ジェ クト ・ コ ー ド を 生成 す 
る アセ ンプ ラ ) が 使わ れる よう に な り ま す . つま り , 大 き な シ ステ ム を 開発 する 場合 , 長大 な プロ グ 
ラム を 頭 か ら 順 に コツ コツ と 書い て いっ た の で は , 大 変 な 時 間 が か か り , その デバ ッ グ も 窒 易 な こと 
で は あり ませ ん . 

で は , どう すれ ば いい の で し ょ う . そこ で “モジ ュー ル 別 ソフ ト 開 発 法 ” が 登場 し て くる 訳 で す . 
(この 開発 法 は , マシ ン 語 に 限ら ず 高 級 言語 に つい て も 同じ で す ). 

大 き な シ ステ ム を 能率 良く 開発 する に は , 全体 の アロ グラ ム を , 数 個 か ら 数 十 個 の モジ ュー ル ( プ 
ロッ ク ) に 適切 に 分 割 し ます . そし て , 分 割 し た それ ぞ れ の モジ ュー ル に 対し , 入力 条件 , 出力 条件 
な ど , 仕様 を 明確 に 定め た 上 で それ ら の モジ ュー ル を 複数 の 開発 現場 に 分 散 し , それ ぞ れ を 同時 に 平 
行 し て 開発 を 進め る の で す . 

デバ ッ グ は , モジ ュー ル 単 位 , ある い は 関連 ある いく つか の モジ ュー ル を リン ク し て 行い ます . 開 
発 責任 者 は , すべ て の モジ ュー ル の 開発 の 進み 具合 を 見 な が ら , すべ て の モジ ュー ル が , ほ ば 完成 し 
た 適当 な 時 期 に 、 全体 の モジ ュー ル を リン ク し て , 総合 的 な デバ ッ グ に 入り ます .。 

この よう に , 大 き な プ ログ ラム を いく つか の モジ ュー ル に 分 割 し て ,. それ ぞ れ を 独立 に 並列 し て 開 
発 を 行い 、 最 後に 1 つ に まとめ て 完成 させ る 方 法 が “モジュール 別 開 発 法 ′ な の で す . 

次 の 図 は . この “モジュール 別 開発 法 ′ の 考え 方 の アウ トラ イン を 図示 し た も の で す . 
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大 き な シ ステ ム の 開発 
1 ー 
アル ゴリ ズム の デザ イン ーー ニー エーーー テーーー 


モジ ュー ル に 分 割 . それ 一 部 モジ ュー ル の 仕様 変更 
ぞ れ の 詳細 な 仕様 決定 


さっ > 則 環 3 ミー 中 避 


Figure-3.3.1 モジ ュー ル 別 ソフ ト 開 発 の 概念 図 


3.3.2 MACRO-80 の 機能 


MACRO-80 は , イン テル 形式 の 8080 ニ ー モ ニッ ク , お よび ザイ ログ 形式 の Z80 ニ ー モ ニッ ク を アセ 
ンプ ブル し , リロ ケー タブ ル な オプ ジェ クト ・ フ ァイル と , PRN リ スト ・ フ ァイル , それ に シン ボル ・ 
テー ブル の リス ト ・ フ ァイル を 出力 する 8080/Z80 両 用 の アセ ンプ ブラ で , マク ロ 機 能 を 持っ て いま す . 

MACRO-80 に より 生成 され る リロ ケー タブ ル ・ オ プ ジ ェ クト の 形式 が , リロ ケー タブ ル ・ オ プ ブ ジ ェ 
クト の "標準 フォ ー マ ッ ト ” と な っ て お り , 3.2 章 の RMAC な どの 他社 の アセ ンプ ラ は も と より , 5 
章 で 取り 上 げ て いる よう な 。 各種 高級 言語 の コン パイ ラ 出 力も 、 リロ ケー タブ ル な も の は , ほとん ど 
が この 形式 を 採用 し て いま す ( 3. 2 章 の RMAC に よる も の と の リン ク , 3.5 章 の コン パイ ラ と の リン 
ク を 参照 ). 
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マク ロ 機 能 は , 3 . 1 章 の MAC と ほぼ ば 同じ 機能 を 持っ て いま す の で , MAC の 項 を 参照 し て 下さ い (た 
だ し , MAC で 可能 な マク ロ ・ ラ イブ ラリ を 取り 込む 機能 は , MACRO-80 に は あり ませ ん ). 


3.3.3 MACRO -80 に よる モジ ュー ル 別 ソフ ト 開 発 の 実例 


で は , モジ ュー ル 別 開発 法 に より , 1 つの 科 単 な プロ グラ ム を 作っ て み ま し ょ う . 

作成 し よう どす る プロ グラ ム 自 身 は , モジ ュー ル 別 開発 を 行う まで も な い 簡 単 な も の で す が , 要 は , 
その 手法 , 開発 過程 に 注目 し て 下さ い . 

次 の よう な プロ グラ ム を 作成 し ます . 


@ ブロ グラ ム 名 は “MAIN/. 
@ ブロ グラ ム を 起動 する と ,「 コ マン ド を 入力 せよ 」 と いう メッ セー ジ を 表示 する . 
@ そこで “M′ を キー イン する と 「GOOD MORNING」 
0 / 「GOOD AFTERNOON」 
*N” / 「GOOD NIGHT」 
と 表示 され , 再び コマ ンド 入力 に 帰る . 
筐 宮 グラ ム の 終了 は , Ctrl-Z2 を キー イン する こと に より ,。CP ノ M に 戻る . 


上 記 の プロ グラ ム を 実現 する た め に , プロ グラ ム 全 体 を 次 に 図示 する よう に 3 つの モジ ュー ル に 分 
け , それ ぞ れ に つい て 別々 に 開発 を 行う) こと に し まし ょ う . 


メイ ン ・ モ ジュ ー ル (モジ ュー ル 名 MAIN* ) 


当 プ ログ ラム の アル ゴリ ズム に 基づき , プロ グラ ム の 流れ を コン 


する . 当 プ ログ ラム の 中 心 と な る モジ ュー ル . 


3 つの モジ ュー ル 
に 分 ける ヶ 
モジ ュー ル | (モジ ュー ル 名 “MODUL1? ) 


Na コン ソー ル か ら の | サブ ルー チン , コン > ソール ヘ へ の メッ セー ジ 
| 作成 する プロ グラ ム 0 ン , コン し 「 
し 出力 サブ ルー チン を 納め た 各種 サチ ルー チン の モジ ュー ル 、 

モジ ュー ル 2 (モジ ュー ル 名 “MODUL2* ) 
コン ソー ル へ 出力 する 各種 メッ セー ジ の スト リン グ を 納め : 
各種 メッ セー ジ ・ ス トリ ング の モジ ュー ル 。 
Figure-3.3.2 3 つの モジ ュー ル に 分 けら れ た 各 モ ジュ ー ル の 機 能 
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ここ で は , この よう に 人 簡単 に モジ ュー ル に 分 ける こと が で きま し た が , 実際 の 大 き な シ ステ ム の 開 
発 と な る と , 全体 の アル ゴリ ズム を 考え , 各 モ ジュ ー ル に 分 け , それ ぞ れ の 機能 を 特定 する 作業 は , 最 
も 大 変 な 作業 と な る で し ょ う . こ れ が で きれ ば , も う 開 発 は 半ば 完成 し た と 言っ て も 良い で し ょ う . 後 は 
た だ , モジ ュー ル 別 の 仕様 に 従っ て 、 それ を 満足 する プロ グラ ム を ひたすら 組ん で 行け ば 良い の で す . 


各 モ ジュ ー ル ・ レベ ル で の 開発 | 


さて ,。 この プロ グラ ム の メイ ン ・ モ ジュ ー ル か ら 順 に プロ グラ ム を 作っ て 行き まし ょ う . 


メイ ン ・ モ ジュ ー ル 
メイ ン ・ モ ジュ ー ル の ソー ス ・ リ スト を 次 に 示し ます . この 場合 ,、 モジ ュー ル 名 を 宣言 する 疑似 命 
令 の NAME を 省略 し まし た の で , モジ ュー ル 名 と し て , ファ イル 名 が 自動 的 に 付け られ ます . 
今回 の プロ グラ ム は , Z80 用 に コー ディ ング し て あり ます の で , 8080 の マシ ン 上 で この 実習 を する 場 
合 は ,。 ソー ス ・ リ スト の 一 部 を 変更 し て 下さ い . 


A>TYPE_MAIN。MAC 7 メイン ・ モ ジコ ユー ル , ヾ MAIN" の ソー ス ・ フ ァイル を タイ プア ウト し て 示す . 
は 11111111111111131111111111111111111141111111111 
1 MACR ロ -BO SAMPLE PRDBRAN 1 
1111111111111111111111111111111111111111111171. 


ON アセ ン ブ ル に より 生成 され る PRN フ ァイル 
TITLE  *ーーー- MACRD-BO SQAMPLE PRDGRAM ーーー” の ベー ジ ・ ヘ ッ ダ を 登録 . 


PUBLIC BDDS シン ボル"BDOS" を , 他 の モジ ユー ル で も 使用 可能 シン ポル と し て 宣言 . 


EXT KEYIN, MSGOUT | これ ら 5 つ の シン ボル は , 他 の モジ ユー ル で 宙 言 され て いる 
EXT MSGINP 。 NMSBMNNG 。 NSBAFT 。 NBBNIT | シン ボル で あり , 当 モ ジュ ユー ル で 使用 する こと を 宣言 する . 
ASEB これ 以後 の プロ ブラム を , ロケ ー シ ヨ ン ・ カ ウン の 起点 を 100H と し て , 私 番 で アセ ン 
DRG 1OOH | ラル する 。 つま り , "ASEG" は , リロ ケー タブ プル な オプ ジェ クト は 生成 し な | 

EQU OOO5H ーー シス テム ・ コ ー ル の エン トリ ・ ポ イン ト . 

LD DE BTNEI | コピ ンド 入力 守 ツ ツ E こ 2 衝 る メッ セー ジ の アド レス を 示す `MSGINP” と , 


CALL 「 サブ ルーチン の ~MSGOUT" の シン ボル が , 外部 の モジ ユー ル の も の で ある ご こと に 注目 . 
CALL EYIN ーー コン ソー ル 入 力 . サブ ルーチン "KEYIN" が , 外部 の モジ ユー ル の も の で ある こと に 注目 . 
CP し 


| が ダダ へ ミ に 
JR 7 ,MORNING 「 カ が "M な ら ば *MORNIG" ヘ ジャ ンプ . 
CP プイ も 1 へ ジャ セー 
JR 2,AFTERNOON A" な ら ば *AFTERNOON* ヘ ジャ ンプ . 
CP >N" 0 cy 
JR 7。NIGHT | N" な ら ば NIGHT? へ ジャ ンプ ブ . 
RET 。。。 2 |!Ctn-Z な ら ば プロ グラ ム を 終了 し て , CP/M へ 戻る . 
JR MAIN … い ざれ で も な い 場 合 は 。 も う 一 度 "MAIN” へ 戻る . ( 
MORNINGs 
LD DE IMSGHNG] | シン ボル *MSGMNG" で 示さ れる メッ セー ジ の 文字 列 を , サ ーー 
CALL SGOUT] | コン ソー ル に 表示 する . これ ら の シン ボル が 外部 の モジ ュー ル の も の で ある こと | 
JR MAIN 再び "MAIN" に 戻り 繰り 返し . 
AFTERNDON』 
LD DE ,[SGAFT] | ゃ RT 
CALL 5G0UT | ( 軸 上 . シン ボル "MSGAFT* の メッ セー ジ を 表示 する . 
JR MAIN 
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IT| 


1 ら は NN 
ISGDUT] 


Figure-3.3.8 メイ ン ・ モ ジュ ー ル “MAIN” の ソー ス ・ リ スト . 


上 記 ソ ー ス ・ リ スト を 基 に , エディ タ を 使っ て ソー ス ・ フ ァイル を 作り ます . ファ イル 名 は `MAIN . 
MAC” と し まし た . 

MACRO-80 で アセ ンプ ル す る ソー ス ・ フ ァイル の エク ステ ンション は , 必ず MAC′ で な けれ ば 
な り ま せん . 

ソー ス ・ フ ァイル が 作成 で きた ら , 次 は アセ ンプ ブル を 実行 し ます . M80 (MACRO-80 の コマ ンド ・ 
ファ イル 名 ) を 実行 する 際 の コマ ンド ・ ラ イン に より , 前 述 の MAC や RMAC と 同じ よう に , 入力 ファ 
イル や 出力 ファ イル の 指定 や . アセ モン ブル 時 の 各種 の コン トロ ー ル を 行う こと が で きま す が , ここ で 
は 最も 基本 的 な 形式 で 実行 し ます . 

M80 に よる ソー ス ・ フ ァイル “MAIN . MAC” の アセ ンプ ブル 例 を 次 に 示し ます . 


Figure-3.3.4 M80 に よる ソー ス ・ フ ァイル MAIN. MAC" の アセ ンプ ブル と 、 その 結果 の 確認 . 


この よう に , ソー ス ・ フ ァイル “MAIN. MAC* か ら ,。 リス ト ・ フ ァイル “MAIN. PRN” と 。 リ 
ロケ ー タ プル の オプ ジェ クト ・ フ ァイル ^MAIN. REL” が 生成 され て いま す . 

次 に ,。 この PRN リ スト ・ フ ァイル を プリ ンタ に タイ プア ウト し て み ま し ょ う . プリ ント 用 紙 の 折り 
目 を 適当 な 位置 に セッ ト し て 。, 


A>TYPE MAIN. PRNAPJ 
を 実行 する こと に より , プリ ンタ に PRN リ スト を 出力 で きま す . 
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JoRo-eo 3.4 Oi-Dec-6O PA 


1 の. euC で WS こと 
・ 寺 バー スト と しく 。 
レシ t の に て ST) 


oto7* 。 maiw ouoo 
MewWo Oii 


Figure-3.3.5 アセ ンプ ブル に より 生成 され た PRN リ スト ・ フ ァイル の プリ ンタ へ の タイ プア ウト . 


この よう に , PRN リ スト ・ フ ァイル は , 1 ペー ジ 50 行 の ペー ジ 割 り 付け が 行わ れ (疑似 命令 "PAGE/ 
の 指定 に より , 任意 の 行 数 に 設定 する こと が 可能 ), ソー ス ・ フ ァイル で 宣言 し た TITLE” に より , 
ペー ジ ・ ヘ ッ ダ 部 に タイ トル 名 と ペー ジ No が 表示 され ます . PRN リ スト 最後 の PAGE S” の ペー ジ 
は , シン ボル ・ テ ー ブ ル が リス ト ア ウト され る ペー ジ で す . 


モジ ュー ル 1 

メイ ン ・ モ ジュ ー ル の 場合 と 同様 に .。 ソー ス ・ リ スト , アセ ンプ ラ の 実行 , 生成 され た PRN フ ァ イ 
ル の タイ ププ" アウ ト を 示し ます . 実行 方 法 な ど は ,。 メイ ン ・ モ ジュ ー ル の 場合 と 同様 で す の で 省略 し ま 
ず 。 


モジ ュー ル 1 の ソー ス ・ フ ァイル (MODUL1 . MAC) の リス ト . 


AA>TYPE MODUL 1 . MAC / 


PUBLIC KEYIN。MSGOUT この 2 つの シン ボル を , 他 の モジ ユー ル で も 使用 可能 シン ポル と し て 宣言 . 


EXT BDOS 他 の モジ ュ ユール の シン ポル *BDOS" を 使用 する こと を 宣言. 
KEYINs 

LD 1 | 

CaLL 本 7 コン ンー ルル 8 疫 Ph す 

RET 
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MSBUUTs 
LD ビ ,9 
CALL BD0B | メッ セー ジ 出 力 の サブ ルー チン . 
RET | 
END 
a> 


Figure-3.3.6 モジ ュー ル 1 (MODUL1 . MAC) の ソー ス ・ リ スト . 


ソー ス ・ フ ァイル “MODUL1 . MAC" の アセ ンプ ブル 実行 . 


A>MBO_MODUL 1 , MODUL 1 =MODUL 1 /Z MODUL14 .MAC を アセ ン ブ ル . Z80 用 な の で */2" ス イツ チ を 付け る , 


No Fa も ta1 @rFOr(s) 


A>DIR_MODUL1。 ま / ・ 生成 され だ 各 フ ァイル の 確認 . 

Rs PODUL1 PRN 』 MODUL1 MAC 』 MODUL1 REL 
ソー ス ・ フ ァイル 

Aa> 


Figure-3.3.7 ソー ス ・ フ ァイル “MODUL1 . MAC" の アセ ンプ ブル と , 生成 され た 各 フ ァイル の 確認 . 


Figure-3.3.8 生成 され た PRN フ ァイル “MODUL1 . PRN” の タイ プア ウト . 


1 紀 1 
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モジ ュー ル 2 

モジ ュー ル 2 の 場合 も 同様 に 。 ソー ス ・ リ スト, アセ ンプ ブラ の 実行 , 生成 され た PRN フ ァイル の タ 
イプ アウ ト を 示し ます . 

モジ ュー ル の ソー ス ・ フ ァイル (MODUL2 . MAC) の リス ト . 


>TYFE MODUL2.IMAC / 


PUBLIC MSBINP。MSGMNG, MSBAFT 。 SSN1T 4 つの シン ボル に PUBLIC を 宣言. 


EQU QDH 
EQU OAH 


DB CR,LF。" KEY INPUT ( M /A ZN うつ > の | 

DB CR,LF 。" HELLO GBDOD MRNINB' 。CR。 し F。" CS が に 

DB CR。LF。"HI ! GOQD AFTERNOON",CRuLFY ま | 0 
MSBNITk DB CR,。LF,。" BUOD NIGHT BYE-BYE' ,CR。LF 。" 生 * 


END 


Figure-3.3.9 モジ ュー ル 2 (MODUL2 . MAC) の ソー ス ・ リ スト . 


ソー ス ・ フ ァイル “MODUL2 . MAC′ の アセ ンプ ブル 実行 . 


>MBO_MODUL2。FMODUL2=NMODUL2/Z ) MODOL2.MAC を アセ ン ブ ル . 


No Fata1 error(5s) 


A>DIR MODUL2。*/ 生成 され だ 如 フ ァイル の 確認 . 
Rs MODUL2 MAC 』 NMODUL2 PRN *』 IODUL2 REL 
ソー ス ・ フ ァイル 


仙 > 


Figure-9.3.10 ソー ス ・ フ ァイル “MODUL2 . MAC′ の アセ ンプ ブル と , 生成 され た 各 フ ァイル の 確認 . 


生成 され た PRN フ ァイル “MODUL2 . PRN” の タイ プア ウト . 
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Figure-3.3.11 生成 され た PRN フ ァイル の タイ プア ウト . 


さて , 以上 で 「 メ イン ・ モ ジュ ー ル 」, 「 モ ジュ ー ル 1 」, 「 モ ジュ ー ル 2 」 の すべ て の モジ ュー ル の 
開発 が 一 応 終わ り ま し た . 本 来 な ら ば , モジ ュー ル 上 単独 で の デバ ッ グ を 行う 訳 で す が , ここ で は 省略 
し て いま す 。 商 の ステ デップ は 。W ゆ よい いま パリ シク 7 で す . 


LINK-80 に よる オプ ジェ クト ・ モ ジュ ー ル の リン ク | 


リン ク ・ ロ ー ダ は , 今 ま で バラ バラ に 開発 を 行っ て き て , で き 上 っ た 各 モ ジュ ー ル の リロ ケー タプ 
ル ・ オ プ ジ ェ クト ・ フ ァイル (例え ば , MAIN . REL や , MODUL1 . REL な ど ) を , 任意 の 順 褒 で つ 
な ぎ 合 わせ , 実行 可能 な 絶対 アド レス を 持っ た 1 本 の オプ シェ クト ・ フ ァイル (COM フ ァイル ) に 変 
換 す る も の で す . Yersion 3.35 か ら HEX ファ イル へ の 変換 も 可能 で す . 

今回 の 例 で は , 次 の 図示 す よ うな こと を 行い ます . 
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メイ ン ・ モ ジュ ー ル ゴ 


MAIN プ EN に より , メ イン ・ メ モリ 上 の 
オプ ジェ クト が ,。 ディス ク 上 に 
“MAIN.COM" と し て セー プ さ れる . 


リロ ケー ト さ れ た 
モジ ュー ル 2 


HIGH 
リロ ケー タプ ブル 
・ ア ドレ ス メイ ン ・ メ モリ 上 に , 実行 可能 な 


絶対 アド レス を 持つ オブ ジェ クト 
と し て ロー ド さ れる . 


Figure-3.3.12 リン ク ・ コ マン ド L80 MAIN,MODUL 1 , MODUL 2 ,MAIN プ ビン N を 実行 し た 場合 の 働き 


で は , LINK-80 (コマ ンド ・ フ ァイル 名 “L80 . COM” ) を 実行 し て み ま し ょ う . 

L80 も 実行 時 の コマ ンド ・ ラ イン に オプ ショ ン の バス イッチ? を 付け る こと に より , ロー ディ ング に 
際 し , 各種 の 処理 を 行わ せる こと が で きま す . 

今回 の リン ク 実 行 時 の コマ ンド ・ ラ イン の 意味 は , 


L80 を 起動 し , 

ディ スク 上 の “MAIN . REL” を 実行 可能 な オプ ジェ クト ・ コ ー ド と し て ロー ドレ し , 

それ に 続け て , MODUL1 . REL′ と “MODUL2 . REL” を 同様 に ロー ドレ し , 

メモ リ 上 に ロー ド し 終わ っ た , 実行 可能 な オプ ジェ クト を MAIN . COM” と いう ファ イル 
名 ディ スグ に セー デ し 。 

5. セー ブ が 終了 し た 後 , CPM に 戻る . 


ゅ CO トビ 


と いう 内 容 を , L80 に 指示 し て いま す . 
その 実行 例 を 次 に 示し ます . 
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*MAIN" と いう ファ イル 名 で , 


回 リ > 5 べ て が メイ ン ・ メ モリ 上 に 出来 上 つ だ , 実行 可能 な 
人 の OR オフ ジェ クト を COM フ ァイル "と し て ディ 
に 戻る . = 


M 
Q>LBO_MAIN,MODUL 1 , MDDUL2。MAIN/E/N) に L80 リ ン フ ・ ロ ー ダ の 実行. 
Link-BO さ .4 る 14-Qpr-B1 Copyright (c) 19 昌 1 MicCrOsoft 
Data Q10O O1 人 7 く 16 プ > 

プロ グラ ム の る を し 才 導 レス 10 進 で の バイ ト 数 
さ 2596 Bytes Free "し GP/M の サイ ズ に よ つ て 異な る . メイ ン ・ メ モリ の 大 り 司 構 . 
tQoQOoOo Q1QZ 4] 


A> 1 前 バイト の ペー ジ 数 . 


Figure-3.83.13  L80 に よる リン ク ・ ロ ー ダ の 実行 例 . 


この 場合 ,、 メ イン ・ モ ジュ ー ル は , “ASEG” と “ORG 100H′ に より , 先頭 の ロケ ーション は 100 
H に 指定 され て お り , L80 の コマ ンド で 特に 指定 し な く て も , “MAIN . REL” は 自動 的 に 100H か ら ロ 
ー ド され まず す 。 

他 の モジ ュー ル は , “CSEG? 指定 (ソー ス ・ フ ァイル に , ASEG, CSEG, DSEG な どの 指定 を 省略 
し た 場合 は , 自動 的 に CSEG 指 定 と な る ) な の で , リロ ケー タブ ル で あり , それ ぞ れ 前 モジ ュー ル の 最 
後 の ア ドレ ス に 続い て ロー ド さ れ ま す . 

次 に , 生成 され た COM フ ァイル を DIR で 確認 し て み ま し ょ う . 


>DIR MAIN.* ) ーー 生成 され だ ファ イル の 確認 . 
as MAIN MAC 』 MAIN PRN 』 MAIN REL 』 MAIN CON 


L80 の 実行 に よ つ て 生成 され な, ーー 


> 


Figure-3.3.14  L80 に より 生成 され た COM フ ァイル の 確認 . 


この よう に , 3 つの モジ ュー ル の “REL′” オプ ジェ クト ・ フ ァイル か ら , 実行 可能 な 1 本 の "COM? 
ファ イル が 生成 され て いる こと が 確認 され ます . 


リン ク さ れ た プロ グラ ム の 実行 


リン ク が 終わ る と , 次 は プロ グラ ム 全 体 を テス トラ ン さ せ て 。, 総合 的 な デバ ッ グ に 入り ます . バグ 
が あれ ば , 該当 モジ ュー ル の 修正 一 再 リン ク を 繰り 返し 行い ます . 

当 プ ログ ラム は 単純 な の で , デバ ッ グ の 必要 も な い 程 で す が , 一 応 , 実 動 テ スト を し て み ま し ょ う . 

当 プ ログ ラム “MAIN . COM” の 実行 例 を 次 に 示し ます . 
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4 A>MAIN ) リン グ し て 完成 され な ブロ グラ ム の 実行 . 


HELLD GOOD MORNING 


KEY INPUT (NM/aA/ZN )? 
HI ! GOOD AFTERNOON 


KEY INPUT ( NM /A/ZN)? 
BOOD NIGHT BYE-BYE 


KEY INPUT (NM/aA/N)? 


Ne 


KEY INPUT (NM/A/ZN)D? >M 


> て Ctrl-Z の キー イン に より , プロ グラ ム を 
終了 し て CP/M に 戻る . 


Figure-3.3.15。 完成 し た プロ グラ ム 


この よう に , プロ グラ ム は 完 動 し , 今回 の 開発 は めで た く 終 了 と いう こと に な り ま し た . 


リン ク ・ ロ ー ダ の その 他 の 解説 


の 守 行 . 


L80 の 実行 は , Figure-3.3.13 に 示さ れ て いる 例 の ほか , 次 の よう に , モジ ュー ル を 1 つ 1 つ 入力 し 
て いっ て も リン ク す る こと が で きま す . モジ ュー ル が リン ク さ れる た びに , 最終 アプ ド レス や オプ ジェ 
の で , リン ク の 動作 を 実感 する こと が で きま す の で , 試み て 下 


クト ・ サ イズ を 表す 値 が 増加 し て いく 
さい .。 その 実行 例 を 次 に 示し ます . 


>LBO) ーー L80 を 起動. 


*MAIN) メイ ン ・ モ ジ ユ ー ル を 入力 


ーMSBNIT O12B 
4 Undefined G1oba1 (5s) 
さ 2700 Bytes Frege 


*MDDUL2 ) モジ ユー ル 2 を 入力 . 


さ 2596 Bytes Free 
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Link-BO さ 。4 さ 14- 人 pr 日 1 Copyright (C) 19 日 1 Mi と rO5 ロ f モ 


Data O1Q0O O1 さ く く 51 > 

ーKEYIN  O107 ーMSBAFT O12 ミ ーMSBINP O1O1 

ーMSGMNG O11B ーMSGNIT O12B ーMSBODUT O12E 
6 Undefined Global1(s) 

さ 2712 Bytes Free 

*MDDUL 1 ) モジ ュー ル 1 を 入力 . 

Data O1QOO O1 さ F く 6 さ > 

ーMSBAFT O12 ミ ーMSGINP O1O1 ーMSBMNG O11B 


Data QO10O O1a7 く 。 16Z> 


pg 


MACRO-80 に よる モジ ユー ル 別 ソフ ト 開 発 法 と LINK-80 


*MAIN/E/N ) ーー レバ に COM" と いう ファ イル 名 で ディ 
Pe に セー プ ブレ, CP/M に 戻 


Data Q1Qoo Q1aZ く 。 167> 


さ 2596 Byt 上 es Free 
EQQOQO O1Q7Z 


人 A> 


Figure-3.3.16 L80 に よる 別 の 方 法 で の リン ク . 


この 方 法 で リン ク ・ ロ ー ダ を 実行 し て も , 前 回 と 全く 同様 な “COM” ファ イル が 生成 され , プロ グ 
ラム は 完 動 し ます . 

Figure-3.3.13 や 上 記 の L80 の 実行 に より 生成 され た 実行 可能 な オプ ジェ クト ・ フ ァイル を , DDT 
を 使っ て ダン プ し て 次 に 示し ます . 


A>DDT MAIN.COHM / ……-DDT を 起動 し て , “MAIN.COM* を ロー ド さ する. 


DDT VERS 2.2 

NEXT PC L80 が 挿入 し た スベ ペー 3 
O200 O1Q0QO か 

メイ ン ・ モ ジュ ユー ル . モジ ュー ル 1 . 


OD FE 41 28| .?..9。. さ 。.M(.- 人 (て 

O1~CD- さ の O1I Nean テバ 
76 O1 CD さく 9 O1 1 D6 11 BF/O1 CD ③9 O11 。。。 ソ < の 。。。。 < 。 
S 


<・KEY INPUT (MM 
/ 人 / N )? > 多 。。 
HELLD BOOD MORN 
INB.. ま 。.HI ! GO 
DD AFTERNDON - . ま 。 
・BDOD NIGHT BYE 
ーBYE 。。 多 。。。。-。。 < マ 。 


OD ーーー トー ニート ーー・ー・ー・ 


Figure-3.3.17 完成 し た 実行 可能 オプ ジェ クト ・ フ ァイル の ダン プ . 


3 つの モジ ュー ル が , 上 記 の よう に 配置 され て いる こと が 分 か り ま す . 

次 に , 今 ま で は , アド レス 100H を スタ ー ト ・ ア ドレ ス と し て リン ク を 行っ て きま し た が , 任意 の ア 
ドレ ス を スタ ー ト ・ ア ドレ ス と し て ロー ド す る に は どう すれ ば 良い で し ょ う . その 実例 を 示し ます . 

まず , メイ ン ・ モ ジュ ー ル の ソー ス ・ フ ァイル に 書か れ て いる , “ASEG? と “ORG 100H′ の ス 
ター ト ・ ア ドレ ス を 絶対 番地 の 100H に 固定 する 2 つの 疑似 命令 を , Figure-3.3.3 の ソー ス ・ リ スト `MAIN . 
MAC” か ら 削 除 し ,. ファ イル 名 を 変え て MAINXADR . MAC" と し て お きま す . その 後 , Figure 
-3.3.4 と 同様 に アセ ンプ ブル し て , MAINXADR . REL” を 生成 し て お きま す . その 時 に 生成 され た PRN 
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ファ イル を タイ プア デア ウト し て , その 1 ペー ジ 目 を 次 に 示し ます . Figure-3.3.5 の PRN リ スト と 比較 し 
て で ず も 。 


Figure-3.3.18 "ASEG", “ORG” を 削除 し た メイ ン 
・ モ ジュ ー ル の PRN リ スト . 


さて , 任意 の アド レス へ リロ ケー ト す る 準備 び で きた の で , プロ グラ ム の スタ ー ト ・ ア ドレ ス ( メ 
イン ・ モ ジュ ー ル の 先頭 アド レス ) を 4000H と し て , L80 を 実行 し て み ま し ょ う . その 実行 例 を 次 に 示 
し ます : 


AzLBOJ) L80 を 起動. 


LinkーB 〇 O さ .4 さ 14 一 pr 日 1 CoOpyright (c) 19 日 1 1 と CO 〇 Of も 


*/Ps 40OO。MQINXADR 。 MDDUL 1 。 MODUL2/E ) 最初 の モジ ュー ル の 先頭 アジ ドレ ス を 4000H に セッ ト し て , 
の 5) まく も コール MW 全 に メモ NM ドレ で 
Data 4ooo 4OQ6 < 166> 最後 は "/E" で CP/M に 戻る . 


さ 2597 Bytes Free 
EooOOO 40A6 64 1 


> 


Figure-3.3.19 プロ グラ ム の スタ ー ト ・ ア ドレ ス を 4000H と し て L80 を 実行 . 


上 記 コ マン ド の スイ ッ チ ゾン ノン P : 4000” に より , 最初 の モジ ュー ル の 先頭 は 4000H に ロー ド さ れ た は 
ず で す . 
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DDT て 全体 の ロー ド 状 態 を 確認 し て み ま し ょ う . その 実行 例 を 次 に 示し ます . 


AzDDT) DDT を 起動. 


DDT VER 2- -2 メイ ン ・ モ ジ ユ ー ル モジ ュー ル 1 


< U9 。 39. . . 3.83 


2F KEY INPUT (MM/ 
48| 人 / N )? > も 。。H 


モジ ユー ル 2 


Figure-3.3.20 DDT で アド レス 4000H か ら の ロー ド 状 態 を 確認 する . 


この よう に , リン ク は 先頭 を 4000H と し て 行わ れ て いる こと が 確認 で きま す . も ちろ ん , この プロ グ 
ラム は 4000H ス ター ト て で 実行 する こと が で きま す . 上 記 DDT を 終わ る 前 に コマ ンド “G4000』" に より , 
Figure-3.3.15 と 同様 に , 当 "MAIN” プロ グラ ム を 実行 する こと が で きま す . 試み て 下さ い . 


3.4 高級 言語 コン パイ ラ と マシ ン 語 と の リン ク 


本 書 の 5 章 で も , その 何 種類 か を 取り 上 げ て いま す が , コン パイ ラ 型 の 高級 言語 の 多く は , マイ ク 
ロ ソ フト 社 フ ォ ー マ ッ ト の リロ ケー タブ ル ・ オ プ ジ ェ クト ・ フ ァイル を 出力 し ます . 

よっ て , メイ ンプ ログ ラム を 記述 性 ・ 保 守 性 の よい コン パイ ラ で 作成 し , 高速 を 要求 され る も の や , 
アセ ンプ ブラ で な けれ ば 記述 が 困難 な 部 分 を アセ ンプ ブラ で 作成 し て , 両者 を リン ク ・ ロ ー ダ で リン ク し 
て , 1 本 の プロ グラ ム と する こと が で きま す (コン パイ ラ 側 が メイ ンプ ログ ラム で な けれ ば な ら な い 
訳 で は あり ませ ん ). 

また , コン パイ ラ と アセ ンプ ラ の リン ク に 限ら ず , 例え ば , COBOL か ら の リロ ケー タブ ル ・ オ プ ジ 
ェクト と , PL グ I か ら の リロ ケー タプ ブル ・ オ プ ジ ェ クト な ど , コン パイ ラ と コン パイ ラ と を リン ク す る 
こと も 可能 で す . 

実例 と し て , BASIC コ ン パ イラ (マイ クロ ソフ ト 社 の BASIC COMPILER BASCOM”) と アセ ン 
プラ と の リン ク を 示し ます . 高級 言語 と マシ ン 語 と の リン ク と 言っ て も , 一 般 の パー ソナ ル ・ コ ン ピ 
ュー タ で 使わ れ て いる BASIC イ ンタ プリ ー タ か ら CALL や USER な ど で マ シン 語 を 呼ぶ こと は , 基本 
的 に 異な り , ここ て 解説 し て いる の は 高級 言語 で 作ら れ た マシ ン ・ コ ー ド と , アセ ンプ ラ で 作ら れ た 
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マシ ン ・ コ ー ド を , マシ ン ・ コ ー ド 同志 リン ク し て , 1 本 の プア ログラム に する こと で す の で , 誤解 し 
な が よう に し て 下さ きい 。 

例題 と する プロ グラ ム は , 一 般 的 な 形態 を 取っ て , メイ ンプ ログ ラム を BASCOM で 書き , 高速 性 を 
必要 と する 演算 部 を アセ ンプ ラ で 書く こと に し ます . 

プロ グラ ム の 内 容 は , 主題 が 見 失 な われ な いよ うに ご く 〈 く 簡単 な も の で , 


プロ グラ ム を 起動 する と, 2 つの 値 を キー イン する よう に , メッ セー ジ が 表示 され , 2 つ 
の 値 (例え ば xxx と yyy) を 入力 する と , 「xxx 十 yyy ニ zzz」 の よう に , 2 つの 合計 の 計算 
式 と その 答え が 表示 され る . 


と いう も の で す . 
これ を ,。 メイ ンプ ログ ラム と , サ プ プ ログ ラム に 次 の よう に 機能 を 分 担 し ます . 


メイ ンプ ログ ラム (BASCOM) 


演算 サブ プル ー チ ン (アセ ンプ ブラ) 


3.4.1 BASCOM に よる メイ ンプ ログ ラム の 作成 


メイ ンプ ログ ラム の BASCOM の ソー ス ・ リ スト を 決 に 示し ます . この ソー ス ・ フ ァイル "HIGHLANG . 
BAS′ を , CPM の エディ タ 。 ある い は MBASIC を 持っ て いる 方 は MBASIC 上 で 作成 し ます . 

内 容 は 単純 な の で 特に 解説 の 必要 は な いで し ょ う . プロ グラ ム を 簡単 に する た め , 数 値 を 2 バイ ト 
の 整数 と し て 取り 扱う の で , “DEFINT” 宣言 を し て いま す . 

BASIC イ ンタ プリ タ で は ,。 “CALL* ス テー トメ ント の アド レス 値 が 定 言 され て いな けれ ば な り ま せ 
ん が , BASCOM で は , 宣言 され て いな い 場 合 は 自動 的 に EXT” シン ボル と し て 処理 され ます ( 8。 
2 お よび 3. 3 章 参 照 ). 
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107QO PRINT』 PRINT "INPUT PARAMETER 1 AND 2。 ( Parm1。parm2 ) > リョ 

1OBO INPUT PARAMETER1 。PARAMETER2 

109O * ヶ HL レジ スタ に . 。 DE レジ スタ に . ヶ BC レジ スタ に . 

11oO CALL MCNCAL (PARAMETER1 。 PARAMETER2。 RESULT 〉 

111O " 3 

- 112O PRTNTs PRTNTNPARAMETER1 6" + "3PARAMETER25“ = "3RESULT 

11 さ O GOTQ 1Oeo N 

114O END 自動 8 に シン ボル "MCNOAL* と し て \EXT* 処 理 さ れる . 

に CS 4 
Figure-3.4.1 BASCOM に よる メイ ンプ ログ ラム の ソー ス ・ リ スト . ファ イル 名 の エク ステ ンション は 


"BAS” で ある こと 。 


次 に これ を コン パイ ル し ます . 

BASCOM は , バー ジョ ン 5.30 か ら ラ ンタ イム ・ ラ イブ ラリ の 使い 方 が 変更 され , 通常 の コン パイ ル 
で は , ラン タイ ム ・ ラ イプ ラリ の 一 部 は , 生成 され る “REL” オプ ジェ クト に 組み 込ま れず に , 外部 
ライ プラ リ と し て , プロ グラ ム の 実行 時 に 使わ れる こと に な り ま し た . た だ し , プロ グラ ム を ROM 化 
する 場合 や 完全 に 1 本 の プロ グラ ム と する 場合 は 、 ラン タイ ム ・ ラ イプ ラリ を 全部 オプ ジェ クト に 
組み 込む 必要 が あり , その スイ ッ チ が 実行 例 に 示す “07 な の で す (この バー ジョ ン か ら , カナ も 使 
える よう に な り ま し た ). ' 

BASCOM の 実行 例 を 次 に 示し ます . 


A>BQSCUM HIGHLANG ,。 HIGHLANGB=HIGHLANB/ ロ ナー コン バイ ル の 実行 "/O0" ス イツ チ 本 文 参照 ). 


OOOOO Fata1 Error(s) 
105S8B6 Bytes Free 
コン バイ ル 終 了 . 


A>DIR HIBHLANB. ま ) コン バイ ル に より 生成 され だ 各 フ ァイル の 確認 . 
人 az HIGHLANG BAS sk HIGBHLANB PRN sk HIBHLANG REL 


ソー ス ・ フ ァイル PRN フ ァイル リロ ケー タブ ル ・ オ プ ジ ェ クト ・. 
光電 好い 


だ 


> 


Figure-3.4.2 BASCOM に よる コン パイ ル 実 行 例 と 生成 され た 各 フ ァイル の 確認 . 
以上 で メイ ンプ ログ ラム の リロ ケー タプ ル ・ オ プシ ェクト ファ イル が で きま し た . 参考 まで に , 生 


成 さ れ た PRN フ ァイル を タイ プア ウト し て 示し ます . BASIC 言 語 の ソー ス が , アセ ンプ ラ の ソー ス ・ 
レベ ル に 展開 され て いる (落ち て いる ) こと が 分 か り ま す . 
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/ me HIGHLANG。PRN) PRN フ ァイル の タイ ブ ア ウ ト . へ 


BASCOM 5。. さ O - Copyright 1979。8BO。B1 ( じ ) by MICROSOFT - 1O962 Bytes Free 


OO14 OOOZ いい 上 311111131111 も 411311111 も 111131111111111111113111111 
OO14 OOO ア 101O "を MAIN RODUTINE BY HIGH LEVEL LANGUAGE 3 1 
OO14 OOOZ いい 敵 上 は 1111131111 も 1111131 も 11131111111111111113111131111111 

| OO14 OOOZ 10 さ O * 

| QO14 OOO7 1040 DEFINT 人 -Z 

| OO14 OOOZ7 105O * 

| OO14 OOO7 1O6O RESULT=O 


* ま OO14" TOOOOO』 CALL 全 さ O 
* ま OO17"LO1OOO』 LO1O1O』 LO1O2O』 LO1O さ O』 LO1O40』 LO1O5O』 LO1O60* 


まま OO17* LXI H。OOOO 
まま OO1^A" SHLD RESULTX 
OO1D OOO5 107Q PRINT』 PRINT “INPUT PARAMETER 1 AND 2。 ( parm1。parm2 ) >" ョ 
まま OO1D*LO1O7O』 CALL 生 PROA 
まま OO2O* LXi H。 く と ons キ > 
キネ OO2 さ * CALL ま PV2D 


ぺ * この よう に アセ ンプ ブラ の ソー ス ・ レ ベル に 変換 され て いる . 2 


Figure-3.4.3 コン パイ ル に より 生成 され た PRN フ ァイル の タイ プア ウト . 


3.4.2 アセ ンプ ラ に よる 演算 ルー チン の 作成 

BASCOM の “CALL” ステ ー ト メン ト に より , それ ぞ れ の 変数 の アド レス が , PARAMETER1 は 

(HL), PARAMETER2 は (DE), RESULT は (BC) の 各 レ ジス タ に より 与え られ ます . よっ て 当 
演算 ルー チン は それら の 値 を 取り 出し て その 和 を 求め 。 RESULT の アド レス へ 答え を 格納 すれ ば 良 
い の で す . 極め て 簡単 な “DAD” を 使っ た 16 ビ ッ ト の 和 を 求め る 演算 ルー チン の ソー ス ・ リ スト ( ア 
セン ブル に より 生成 され た PRN フ ァイル ) を 次 に 示し ます . こ れ を 基 に , ソー ス ・ フ ァイル "MACHINE. 
MAC′ を エディ タ で 作成 し て 下さ い . 

AGRO-Bo 3c4 iDecc80 PABEo1o WACRO-80 さ .4 。 on-pec-Bo 


4311111311113311131311331111311311111 は 33 は は 13 
すま MACHINE SUB ROUTINE 
LE31111111111111111111111311311111131111 


Macr の ss 


Symbol ms 
アセ ンプ ル 厩 の オプ ジェ フト は 。 ず MCNCAL Oooory 
て ンタ グル で ね る こと る 所 PUBLIC MCNCAL KMCNCAL< を 


し 4 っ No Fatal mrror(s) 
PARAMETER1 の 代 を 8 

て ジス タ に ロー ド 

MOV 


PARAMETER2 の 人 壇 を D 
E レ ジス タビ ロー ト 


ミ ュ ミ る 


MOV 


PARAMETER1+PARAMETER2 
DAD の 値 を . し レジ スタ に ロー ド 

POP 
MOV 
STAX 


貼 


詩 で ある H. し レジ スマ の 信 を . 
INX *RESULT* の アド レス へ スト ア 
POV 
BTAX 
RET 


B 
C+ 
は 
B 
E 
H 
D 
B 
BB 
人 。 
に 
に 
仙 
旨 


エ 


END 青 政 サブ ルー チン 幼 り . リ ダー ン 


Figure-3.4.4 アセ ンプ ラ に よる 演算 ルー チン の ソー ス ・ リ スト (アセ ンプ ブル に より 生成 され た PRN フ ァイル ). 


つ 0 つ 
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ソー ス ・ フ ァイル “MACHINE . MAC′" を , M80 あ る い は RMAC で アセ ン ブ ル し ます (実行 例 は 


省略 、 3.2, 3.3 章 参照 ). 
アセ ンプ ブル に より , 演算 ルー チン の オプ ジェ クト ・ フ ァイル "MACHINE . REL′ が 生成 され だ ら , 
いよ いよ メイ ンプ ログ ラム と の リン ク を 行い ます . 


3.4.3 メイ ンプ ログ ラム と 演算 ルー チン と の リン ク 


L80 に より , 両方 の オプ ジェ クト を リン ク し ます . その 実行 例 を 決 に 示し ます . 


この 2 つ を リン グレ し て, この 如 前 の *COM" フ ァイル を 生成 し て , CP/M へ 戻る . 
A>LBO_HreHLANe acHINE』LTNKPROS/E/N/ 
Link-BO さ 。.4 く 14-apr- 昌 1 Copyright (Cc) 1981 Microsnft 
Data O10 さ 281B く 1O0008> 


19227 Bytes Freg 
EO11a 281B 401 


A> リン 終了. 


Figure-3.4.5 メイ ンプ ログ ラム と 演算 ルー チン と の リン グ ク . 


2 つの “REL" フ ァイル , “HIGHLANG” と "MACHINE" を リン ク し て , 1 本 の 実行 可能 な ^COM” 
ファ イル “LINKPROG . COM” が 生成 され た は ず で す . STAT コ マン ド で 確認 し て み ま し ょ う . 


A>STAT LINKPRODG。 ま ) L80 に より 生成 され だ ^COM“ フ ァイル の 確 褒 . 


RECSB BYTES EXT ACC 
79 1OK 1 R/M ansLINKPROG. CO 箇 単 な プロ グラ ム で ある が , 10K バ イト に も な つて いる . 
BYTES REMAININB ON QA』 42K 


仙 > 


Figure-3.4.6 リン ク に より 生成 され た 実行 可能 ファ イル の 確認 . 


この よう に , 10K バ イト の “LIKPROG . COM” が 生成 され て いま す . 小さ な プロ グラ ム で ある の 
に , 10K バ イト と , オプ ジェ クト 効率 が 良く な い の は , コン パイ ル 時 に スイ ッ チ バン O” を 付け て , す 
べ て の ラン タイ ム ・ ラ イブ ラリ を 取り 込ん だ た めで あり , この ラン タイ ム ・ ラ イプ ラリ を 別 フ ァイル 
の まま に し て お け ば , オプ ジェ クト は も っ と 小さ く な り ま す (バー ジョ ン 5.30 以 上 の 場合 ). 

で は で き 上 っ た プロ グラ ム を 実行 し て み ま し ょ う . 実行 例 を 次 に 示し ます . 
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マク ロ ・ ア セン プラ お よび リン ク ・ ロ ー ダ に よる ソフ ト 開 発 


A>LINKPROG ) 完成 し た プロ グラ ム の 実行 . 
INPUT PARAMETER 1 QND 2。 ( parm1。parm2 ) >? 25O,75O )/ 
250 + 75O = 1000 


INPUT PARAMETER 1 AND 2。 ( parm1。parm2 ) >? BOBO,6809 / 


BOBO + 6BO9 = 14889 
INPUT PARAMETER 1 AND 2。 ( parm1。Parm2 ) >? BOB6。-B6 ) マイ ナス の 値 の 剛 . 
BOB6 + -6 = BOOQO 

INPUT PARAMETER 1 AND 2。 ( parm1。parm2 ) >? へ ビ Ctrl-C の 入力 で CP/M へ 戻る . 
STOP at addresws O1SO_- BASCOM シ ステ ム か ら の 出力 . 


1 
人 > 


Figure-3.4.7 で き 上 っ た プロ グラ ム の 実行 . 
この よう に 合計 が 求め られ て いま す . 


注 ) 演算 は 16 ビ ッ ト の 整数 で 取り 扱わ れ ま す の で , 一 32767 一 十 32767 の 男 囲 の 数 で な けれ ば な り ま 
せん . 


ここ で の 例題 は 非常 に 単純 な も の で す が , この 手法 の 応用 は , 複雑 で 時 間 の か か る 計算 や , 高速 性 
を 必要 と する 機器 の 制御 な どの ソフ ト ウェア の 開発 に 威力 を 発揮 する で し ょ う ). 
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2 昔 和 の 8 CPU おび 
76pr CPU の ソノ 月 発 


ACT69 の 使用 例 


8bit の CPM マシ ン 上 で , 8080, 8085,、Z80, 6502, 6800. 6809 な どの 8bit CPU、 お よび 8086, 8088, 
Z8000 な どの 16bit CPU の アセ ンプ ブリ 言語 を アセ ンプ ル す る こと が で きま す . これ ら は "クロス ・ ア セ 
ンプ ブラ” と 呼ば れ て お り , 1 台 の CPM マシ ン で , 多く の 異な っ た CPU の ソフ ト 開 発 が 可能 と な る 便 
利 な も の で す . クロ ス ・ ア セン プラ で あっ て も , その 機能 は 自分 自身 の CPU 上 で 使用 する アセ ンプ ブラ 
の どれ を も 上 回 る 製品 も あり , 正 に CPM な ら で は の 現象 と 言え ます . 

一 方 , 8bit の CPU の アセ ンプ ブリ 言 語 の プロ グラ ム を , その まま 16bit CPU の アセ ンプ ブリ 言語 の プロ グ 
ラム に , 自動 的 に 書き 変え ん て し まう "トランスレータ" と 呼ば れる ソフ ト が あり ます . 

この 種 の ソフ ト は 現時 点 で は , 8080 ソ ー ス ・ コ ー ド を 8086 ソ ー ス ・ コ ー ド に トラ ンス レー ト す る も 
の と ,Z80 ソ ー ス ・ コ ー ド を 8086 ソ ー ス ・ コ ー ド に トラ ンス レー ト す る も の が 発売 され て いま す が , そ 
の 他 の CPU の も の も 近々 に は 出現 する の で は な いか と 思い ます . 

本 章 で は , この よう な 開発 用 ソフ ト の 中 か ら , 6809 ア セン ブラ と 8080 一 8086 ト ラン スレ ー タ を 取り 
上 げ , その 使用 例 を 紹介 し ます . 


4.1 ACT69 の 使用 例 


ジー シム 神 の クロ ス ・ ア キモ シン プラ ,。 "ACT" シリ ー ズ に は 。 息 時 点 や 


ACT80 (イン テル 8080, 8085, Z80) 
ACT65 (モス テッ ク 6502) 

ACT68 (モト ロー ラ 6800) 

ACT86 (イン テル 8086, 8088) 
ACT69 (モトローラ 6809) 


が そろ っ て いま す . これ ら は , どれ も ほぼ 同様 な アセ ンプ ブル 機能 を 持っ て お り , 基本 的 な 機能 は 3 章 
で 紹介 し た “MAC” や “MACRO-80′ と 大 体 同 じ マ クロ ・ ア セン ブラ で す が , ACT 独自 の ユニ ー ク 
な 機能 ちい くつ か 追加 きれ て いま す . 

で は , ACT69 の 実行 例 を 示し まし ょ う . 

ソー ス ・ フ ァイル は , ACT69 の ディ スケ ッ ト に 含ま れる テス ト 用 の ソー ス ・ フ ァイル を 使用 し ます . 
この ソー ス ・ フ ァイル は , 6809 の すべ て の オペ レー ショ ン ・ コ ー ド と レジ スタ の 組み 合わ せ が , アセ 
ンプ リ ・ ソ ー ス ・ プ ログ ラム と し て 書か て れ て いる も の で す . 

この プロ グラ ム の 冒頭 に は , “LINK? 疑似 命令 で ディ スク 上 の 別 の ファ イル “ADRM6809 . A69′ を 
リン ク す る よう に 記述 され て お り , この リン ク の 様子 も 見 る こと が で きま す . 

ソー ス ・ フ ァイル “SMPL6809 . A69′ (ソー ス ・ フ ァイル の エク ステ ンション は , “A69” で な けれ 
ば な ら な い ) を タイ プア ウト し て 次 に 示し ます . 
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他 の 8bit ご ピ U お よび 16bit ご CPU の ソフ ト 開 発 


>TYPE SMPL68O9 . Q6 6809 の ソー ス ・ フ ァイル の タイ プア ウト . 


nn 
LT 11 
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ファ イル の エフ ステ ンション は ^A69? で な けれ ば な ら な い 、. 
TITLE * Smp1 68O9 - MC6BO9 0pcode Listing。 
Smp16BO9 6BO9 ロ pcode し Listin ロ < 


Since there are 5sO many addressinG mode と omb1inations。 
も he fr 呈 モ Dar モ t of this 1ist Only has nough 1 ロモ Cu と も tion 
to generate every POSsSible f3rst byte。 


The file ADRM6809.Q69 has one Of each address mode。. 


に に 5 

に に ・ い 1 介 FFEE 

生 す 1 adrM6BO マ # ら 1 1 add と e=551n mode 呈 ーー ファ イル “ADRM6809.A69" 
を 呼び 出し , 当 プ ログ ラム の 

ORG 免 1OO 最後 に リン する . 

ABX 5 さ 人 の 

ADCA nn 389 05 

ADCA nn 399 05 

RDCA nn。X 5389 05 

ADCA LT 1 5B9 mmmm 

RADCB 震 nn 5C9 OS 

ADCB nn #D9 OS 

ADCB B。X #E9 8B5 

ADCB 克 mmm ョ F9 mmmmm 

ADDA せ nn 38B OS 

ADDA nn 3?B O5 

ADDA EB。X] 3 人 B 95 

ADDA 11 1 3BB FFEE 

DRB 埋 nn CA 

ORB nn 

DRB O。 -Y 

DRB IT 

DRCC nn 81 


PSHS PC。U。Y。X。 DP。B。A。 CC 
PSHU PC。S。Y。 X。DP。 B。Q。CC 
PULS PC。U。 Y。 X。 DP。B。 人 A。CC 
PULU PC。B。Y。X。 DP。 B。 人 Q。 CC 


ROL nn 809 OS 
ROL *X 二 69 8BO 
ROL mm 579 FFEE 
ROLA 49 

ROLB に >4 

TSBT nn 5OD 

TST O。-Y 

TST 全休 価 人 

TSTA 


ACT69 の 使用 例 


TSTB 
9 Endx Doc ロ np69. asm 
人 > 
Figure-4.1.1 6809 の すべ て の オペ レー ショ ン ・ コ ー ド が 含ま れる テス ト 用 ソー ス ・ フ ァイル の タイ プ 
プ 必 ド 。 


次 に , プロ グラ ム 中 の 疑似 命令 "LINK” で 呼び 出さ れる ディ スク 上 の も う 1 つの ソー ス ・ フ ァイル 
*ADRM6809 . A69" を タイ プア ウト し て 示し ます . これ は 6809 の すべ て の アド レッ シン グ ・ モ ー 


ド が 記述 され た テス ト 用 の ソー ス ・ フ ァイル で す . 


/。 Ao ApReo969 ADRI6B09.A69/ …- デ ィ ス フ 上 の リン され る も う 1 つの ソー ス ・ フ ァイル の タイ ブ ア ウ ト 。 


TITLE * 1 1 6809 Addressing odes.”" 

ま Examp1e of ぁ a11 6BO9 Qddressin ロ ト MOd@es5。 

| nss EQU 14 

n 日 s EQU_ 12 フ 7 

19-】 EQU OFEDCh 

# CCumulator 0Uffwet。 
LDD AX 
LDD Aa Y 
LDD QA 
LDD A。U 
LDD B。X 
LDD B。Y 
LDD B,。8 
LDD B。U 
LDA D,X 
LDA D,Y 
LDA D。S 。 
LDA D,U 
LDD EQ。X] 
LDD EA。Y] 
LDD 9 が | 
LDD tn8,51 
LDD EnB。U1 
LDD EnB,PC1 
LDD Emm16。X] 
LDD Emm16。Y] 
LDD tmm16。] 
LDD Lmm16。U] 
LDD [mm16。P ビ 1] 
END 

仙 > 

、 電 


Figure-4.1.2 プロ グラ ム 中 の 疑似 命令 “LINK” で 呼び 出さ れる も う 1 つの ソー ス ・ フ ァイル の タイ プ 


Ne 


2098 


他 の 8bit CPU りお よび 16bit CPU の ソフ ト 開 発 


で は ACT69 を 起動 し て , アセ ンプ ラ を 実行 し て み ま し ょ う . その 実行 例 を 次 に 示し ます . 


PRN フ タイ ル は ドラ イブ A : 上 に (HEX フ ァイル は 指定 し て いな い の で ログ イン : ア ディ スク 上 に ). 
ソー ス ・ フ ァイル 名 リフ ァ レ ンス ・ マ ッ プ は フル 表示 を 行う . 

M 
QA>ACT69 SMPL6BO9 L=Az  R=F/ ACT69 に よる アセ ン ブ ル 酸 . 


BURCIN 6BO9 Assembler ver さ .5F 
Pass 1 一 Reading AzSMPL6B09 . 69 
Pass 1 一 Reading iQDRNM68O9 . 6 
Pass 2 一 Reading QiSMPL6BO。 Q69 
Pass 2 一 Reading rkQDRNM6BO . AG 

no ERRORe 。 7 Labe1s。 65O4h by モ esg not umed。 Program LMA = OS4Bh 


A> アセ ン ブ ル 終 了 . 


Figure-4.1.3 ACT69 に よる アセ ンプ ラ の 実行 . 


この よう に , それ ぞ れ の パス で 読み 込ま れる ソー ス ・ フ ァイル 名 が 表示 され て 行き ,、 アセ ン ブ ル が 
ST し まし だ 、 
生成 され た ファ イル を DIR で 確認 し て み ま し ょ う . 


A>DIR_BMPL68O9。 ま ) アセン ブル に より 生成 され だ 名 ファ イル の 確認 . 
fs BMPL6BO9 QA69 』 SMPL6BO9 H69 』 SMPL6BO9 PRN 


9 ・ ファ イル HEX フ ァイル PRN フ ァイル 


に 1 


Figure-4.1.4 アセ ンプ ブル に より 生成 され た ファ イル の 確認 . 


この 中 で “H69′ と いう エク ステ ンション の ファ イル が , イン テル HEX 形 式 の ファ イル で す . 

次 に , アセ ンプ ブル の 内 容 を 見 る た め に , PRN フ ァイル を タイ プア ウト し て , その 中 の 数 ペー ジ を 示 
し ます 。 各 ペー ジ に は ほ は ,。 ペ ー ジ ・ ベ ペッグ が 付き 1 ページ の ライ ン 数 は アフ ォ ー ル ト で 61 ラ イン と な っ 
て いま す . 


以上 紹介 し た の は ACT19 の , ご く 基 本 的 な 実行 例 に すぎ な いこ と を お 断り し て お きま す . 
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Figure-4.1.5 ACT69 に より 作成 され た PRN リ スト 
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他 の 8bit CPU お よび 16bit 〇 PU の ソフ ト 開 発 


4.2 XLT86 の 使用 例 


4.2.1 動作 の 概略 
XLT86 は ,8bit の CPZM マ シン 上 で ., 8080 の アセ ンプ リ 言 語 プ ログ ラム を , 16bit CPU で ある 8086 


用 の プロ グラ ム に トラ ンス レー ト す る も の で あり , 今 ま で に 8080 用 と し て 作ら れ た プロ グラ ム を , 人 
手 に よる 書き 替え を 必要 と せ ず , 8086 用 プロ グラ ム に 変換 する こと が で きる も の で す . 
この 機能 を 図示 し た も の を 決 に 示し ます . 


8bit CPM て 実行 


8080 用 ソー ス ・ フ ァイル ( xxxx. ASM) 


8086 用 ソー ス ・ フ ァイル (xxxx.A86) 


8bit CP プ M PRN フ ァイル ( xxxx.PRN) 


この ディ スケ ッ ト を CPM-86 に セッ ト し て , ASM86 で て アセンブル する こと に より , 
8086 上 て 実 動 す る オプ ジェ クト を 得る こと が で きる . 


I6bit CPZM 


8086 用 ソー ス ・ フ ァイル (xxxx.A86) Ka 


アセ シン プラ 
ASM86 
8086 用 へ キサ ・ フ ァイル (xxxx.H86) 


8086 用 リス ト ・ フ ァイル (xxxx.LST) と シン ボル ・ フ ァイル (xxxx.SYM) 


(CP ノ M-80 の LOAD コ マン ド に 相当 する も の ) 


GENCMD 


8086 用 コマ ンド ・ フ ァイル (xxxx.CMD) 


従来 の 8080 用 プロ グラ ム が , 8086 上 て 実行 され る . 


Figure-4.2.1 8086 ト ラン スレ ー タ : XLT86 の 動作 原理 


この 図 か ら も わか る よう に , まず 結論 か ら 言 えば , 8080 用 に 開発 され た プロ グラ ム を , その まま の 
機能 を 持っ た 8086 用 の プロ グラ ム に 自動 的 に 変換 する こと が で きる と いう こと で す . 


フジ 


XLT86 の 使用 例 


で は , Figure-4.2.1 を 順 を 追っ て 説明 し まし ょ う . 

まず , 8080 用 に 開発 され た プロ グラ ム が あり , その アセ ンプ ブリ ・ ソ ー ス ・ フ ァイル が ディ スケ ッ ト 
上 に ある と し ます . 例え ば , 標準 的 な CPM の シス テム ・ デ ィ ス ク に 必ず 含ま れ て いる . ダン プ ・ プ 
ログ ラム の “DUMP . COM” と 。、 そ の ソー ス ・ フ ァイル “DUMP . ASM” な ど を 想定 すれ ば 良い で 
し ょ う . “DUMP . COM" は も ちろ ん すべ て の CP/M 上 で 実行 する こと が で きま す が , 16bit の 8086 上 
で は 当然 な が ら 動 作 し ませ ん . 

8080 用 に 作っ た プロ グラ ム が , その まま で 8086 用 と し て も 使え れ ば , こん な あり が た いこ と は な い 
の で す が , これ を 可能 に する の が XLT86 で ある 訳 で す . 

ダン プ ・ プ ログ ラム を 例 に と る と “COM′” ファ イル の “DUMP . COM” は , 16bit に 関し て は 全く 
何 の 役 に も 立た な い の で , これ は 無視 し ます . 問題 は その アセ ンプ ブリ ・ ソ ー ス ・ フ ァイル “DUMP . 
ASM′ に あり ます . 

XLT86 は , この アセ モン ブリ ・ ソ ー ス ・ フ ァイル を 取り 込み 、 そ の プロ グラ ム の グロ ー バ ル な デー タ の 
流れ を 分 析 し , 適正 な 8086 の イン スト ラク ショ ン に 置き 替え ます . XLT86 の 生命 は , この ~global data 
flow analysisS"” に あり , これ が , 同種 の トラ ンス レー タ に 比べ , 数 10% も 効率 の 良い イン スト ラク シ 
ョ ン を 発生 きせ て いる も の と 思わ れ ま す . 

この よう に , 8080 の アセ ンプ ブリ ・ ソ ー ス ・ フ ァイル か ら ト ラン スレ ー ト され た 8086 用 の アセ ンプ ブリ ・ 
ソー ス ・ フ ァイル は , 任意 の ドラ イブ 上 に ファ イル 名 "xxxx.A86" と し て セー プ さ れ ま す . そし て , 
この ディ スケ ッ ト を , CPM-86 マ シン に セッ ト し (ディ スク の ファ イル 構造 は , CPM-80,、CP/ 
M-86 と も 同じ な の で , その まま どちら を どちら へ 持っ て いっ て も リー ド ・ ラ イト 可能 で す ), その ア 
セン ブラ “ASM86" で アセ ンプ ブル し , GENCMD (CPM-80 の LOAD コ マン ド に 相当 する も の ) で , 
実行 可能 な コマ ンド ・ フ ァイル と する こと に より , 8086 上 で 元 の 8080 の 場合 と 同様 に ダン プ ・ プ ログ 
ラム を 実行 する こと が で きま す .。 


4.2.2 XLT86 の 実行 例 


サン プル ・ プ ログ ラム と し て は , CPM ユー ザー で あれ ば 誰 で も 知っ て いる , 先程 の ダン プ ・ プ ロ 
グラ ム が 適当 な の で す が , 紙面 の 関係 で , も っ と 短い プロ グラ ム で ある 本 書 2 . 2 章 の ファ ンク ショ ン ・: 
9 で の 実習 プロ グラ ム Figure-2.2.15 を 取り 上 げ て み ま す . 

その アセ ンプ リ ・ ソ ー ス ・ プ ログ ラム の ファ イル 名 を , ここ で は FUNC9 . ASM” と し , その タ 
イプ アウ ト を 再度 次 に 示し て お きま す . 

この プロ グラ ム の 内 容 は 非常 に 簡単 な も の で , キー 入力 に 応じ し て それ ぞ れ の メッ セー ジ が 表示 され 
る だ け の も の で す (2. 2 章 の ファ ンク ショ ン : 9 を 参照 ). 
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人 FUNC9 . SN / サン ブル ・ プ ログ ラム の アセ ンプ リ ・ ソ ー ス ・ フ ァイル を タイ プア ウド する . 


2 PIT RG ーー 
1 FUNCTIUN 9』 PRINT STRING 
』 すま ま まま まま まあ まま まま ま まま まま 
ORG 100H 
STARTs 
MV1 C。9 
LXI D, MSGINP 
CALL OOO5H 
MV BB 
地 CALL OOO5H 
CPi d 
JZ MONGOUT 
CP1 ki し 
JZ N1IGTOUT 
CPI 1AH =^Z 
RZ 
MVI C, 2 
MVI やら 
CALL OOOSH 
JNMP START 
MONGBOUTI 
MV1 C。 9 
LXI D, MSGMONG 
CALL OOO5H 
JMP START 
NIGTOUTI 
MVI C,9 
LX1 D,。MSGNIGT 
CALL OQOSH 
JMP START 
MSGINP』 DB  ODH。OAH。"input NM)orning 。 or  N)ight ーーー>$? 
MSBMUNGs_ DB  ODH。OAH。OnH。" BDDD MDRNING! THIS iB FUNETIDN 9。7 。ODH。OAH。" 征 " 
MSBNIGT』 DB  ODH,OAH。OAH。" BDDD NIGHT ! THIS IS FUNCTION 9." 。ODH,OAH。" $" 
END 


0 


Figure-4.2.2 8080 の サン プル ・ プ ログ ラム の アセ ンプ ブリ ・ ソ ー ス ・ フ ァイル の タイ プア ウト . 


この 8080 用 の ソー ス ・ フ ァイル “FUNC9 . ASM” に 対し , XLT86 を 実行 し , 8086 用 の ソー ス ・ 
ァイル が 生成 され る 過程 を 紹介 し ます . 
XLT86 の 実行 例 を 次 に 示し ます . 


XLT86 の 使用 例 


コマ ンド ・ ラ イン の [ ] の 中 に 指定 し た 3 つの パラ メー タ は , 


80…… 生 成 さ れる PRN フ ァイル 中 に 8080 の アセ ンプ ブリ ・ リ スト を 作成 する . 
86…… 同じ く PRN フ ァイル 中 に 8086 用 の ライ ン と ステ ー ト メン ト の リス ト を 作成 する . 
B…… 同じ く PRN フ ァイル 中 に BASIC BLOCK の リス ト を 作成 する . 


と いう 意味 を 持っ て いま す . 


3 つの パ バ パラメータ,「80.「86「B」 を 指定 (本 文 参照). 
1 
A>XLTB6 FUNC9EBOB6B] / 6080 用 ソー ス ・ プ ログ ラム *FUNC9.ASM* に 対し て , XLT86 を 実行 . 


XLTB6 Version 1.1 
Copyright(c) 1981 以下 の 5 ステ ッ プ が 順次 実行 され て 行く . 
Digita1 Research 
Symbo1 Setup 8060 ソ リー ス ・ プ ログ ラム の 各 シ ン ボ ポル の ロケ ーション 確認 の だ め の ス テッ プ . 
Setup B1ocks デー ツタ の 流れ を 分 析 す る だ め の BASIC BLOCK を 決定 する ステ ッ プ . 
Join Bl1ocksm 一 互い の BASIC BLOCK を 結合 し て *Direoted Graph* を 構成 する ステ ッ プ . 
List Blockw フロ ー 分 析 に よる BASIC BLOCK の オプ ショ ナル な リス ト を 作成 する ステ ッ プ . 
Tr ans1 a そ mw-B6 ーー ブロー 分 析 に 従 つて ,8080 イ ンス トラ フシ ョ ン を 8086 イ ンス トラ フシ ョ ン に 変換 する ステ ッ プ 
A> トラ ンス レー トト 終了. 


Figure-4.2.3 8080 の ソー スプ ログ ラム “FUNC9 . ASM” に 対す る XLT86 の 実行 例 . 


この よう に , 5 つの ステ ッ プ を 経て トラ ンス レー ト の 作業 が 終了 し まし た . 
生成 され た 各 フ ァイル を DIR で 確認 し て み ま し ょ う . 


RA>DIR FUNC9。* / XLT86 の 実行 に よ つ て 生成 され る 各 フ ァイル の 確 妥 . 
Rs FUNC ASM 』 FUNC PRN 』 FUNC し に に 】 


SS 各種 リス ト フ ァイル 生成 され だ 8086 用 ソー ス ・ プ ログ ラム 


Figure- 4.2.4 XLT86 の 実行 に より 生成 され た 各 フ ァイル の 確認 . 


8086 用 の ソー ス ・ フ ァイル “FUNC9 . A86” が 生成 され て いま す . 8080 用 の ソー ス ・ プ ログ ラム が , 
どの よう に 8086 用 の ソー ス ・ デ ログ ラム に トラ ンス レー ト さ れ て いる で し ょ う . ^FUNC9. A86" を タ 
4 デメ ナウ ツウ ト し で 導 に 寂し ます , 
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AA>TYPE FUNC9。AB6/ で き 上 つ だ 8086 用 ソー ス ・ フ ァイル の タイ プア ウト . 


NM EQU Byte Ptr OLEBX] 

HLL31131313111111111111111111111111111111111111311391] 

1 FUNCTIUN 9』 PRINT BTRING 

8 4111111111111111111111111111111111111113311311131 す | 
ORG 


1OOH 
STARTI 
, NOV CL。 9 
MV DX。(Dffset MSGINP ) 
INT 224 
MDV CL。1 
INT 224 
CMP 「: 時 に 
ドル 4 MONGOUT 
CMP AL。" N” 
JZ NIBTOUT 
CMP AL 。 1H 5 デバ Z 
JNZ に と る 
RET 
に 3 
NOV CL 。 2 
MOV DL,。 "の ァ 
INT 224 
JMPS START 
NMUNGBUUT』 
CL。9 
NOV DX。 (0Uff set MSBMUNG ) 
INT 224 
JMPS START 
NIGTOUTI 
NOV CL,9 
MOV DX。( ロ ffset MSGNIGT ) 
TINT 224 
JNMPS START 
L_2 EQU に 
DSEG 
ORG Offset L _2 
MSGINP DB ODH, ORH。" input NM)orning or  N)ight ーー 一 > 
MSBMONG DB ODH, OnAH。 ORH。" GBDOUD MORNING! THISB IS FUNCTIDN 9。" 。ODH。 ORH。 "を" 
MSGNIGT DB ODH。OAH。 ONH。* GBDUD NIGHT! THIS IS FUNCTION 9." ,ODH。OAH。" * 
END 
人 > 


Figure-4.2.5 で き 上 っ た 8086 用 ソー ス ・ フ ァイル の タイ プア ウト . 


この ソー ス ・ フ ァイル を CPM の アセ ンプ ブラ “ASM86′ で アセ ンプ ブル すれ ば 良い 訳 で す . 

次 に , 8080 ソ ー ス ・ プ ログ ラム が , 8086 用 に トラ ンス レー ト さ れる 過程 の 分 析 リ スト な ど が 含ま れる 
PRN フ ァイル ^FUNC9 . PRN" の 中 か ら , パ ラメ ー タ ~B” と “86" に よっ て 生成 され た BASIC BLOCK 
の リス ト と , 8086 用 の ライ ン と ステ ー ト メン ト の リス ト を 示し ます . 

ここ で 示さ れ て いる それ ぞ れ の BASIC BLOCK が , デー タ ・ フ ロー の 分 析 に よっ て 適切 に 組み 合わ 
され , 8086 用 に トラ ンス レー ト さ れ て いく 訳 で す . 
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XLT86 の 使用 例 


Lirmr or masic mLOCkB 


haek At ooos suer>。 Ame = oooo 
Entry AENtvet te Actkvee 


loek At OOO (code。 
rtt Acttvei -OEIR -aー 


phock ae ooe ccogenr 
ntry Actver 


lock at onGO (coge。 
ntry Activmr 


pcode usee 


1o134! 


rit Acttven 


pcoe kutle | Ltve reoe 


ーOzWei imCDe&_- ム ー ァ ー 
1WCOyS_ か ーー 


plock At OH17 (mubr)。 
ett Actkver キー-te ーーーーー 


pcpeue -AOzspi i 


pioek At oilA (eee 
Entry Acetiv ー ntt active 


TEETPPPP 


に myte ptr otx う 
TI 
TUWCTION "iu PRINT STRING 
We 
hock At 01 (coge)。 1ow 
Entry Activer rtt Acttvet 一 
letatei opcode uaes 
25 


Cu 
(Ofmet neoinex 


9 


* 


lock At O124 (code)。 
ntry ActIvei 


* 


は 1 


letetei opcode uees ave reoe 


9 


plock At ozC tcogey 


8 # 


itve reoe 


lonooi 


NreTouT 


Wiock At ol2F tcoge。 
Entry active 


は EH 生 | 


Ofwet し っ 
soite OM。 CAH。T nput muerntng or AteNt ーー>e 
oONo De OM。 ORHOew。 "00D POWeNING! TMS HB PUNCTION マ -"。OPM。OAH 


nmewrer pe ODM。 oem。oawt。 "BOOD Nigfr mt ts PUNETKON マ -・。ODH。OAt。・ 


puock At on37 rcoge。 ABe = oisp 


ntry Akveei ーー-\ー 和 ーー ー-。 


Whock At O1SA (gatai。 ABe = Ono 
ntry Acttver - wit Activwi 一 


pcooe killie 


Whock at O1AA (cogeir 


Figure-4.2.6 PRN フ ァイル に 含ま れる BASIC BLOCK の リス ト . 


の アプ 


他 の 8bit CPU お よび 16bit CPU の ソフ ト 開 発 


BASIC BLOCK の リス ト 中 の (subr) は サブ ルー チン , 


(code) は メイ ン ・ ラ イン コー ド , (data) 
は デー タ ・ プ ロッ ク を 表し ます . 
その 他 , XLT86 は , 例え ば CPM-86 の "コンパ クト ・ メ モリ モデ ル ” 用 の ソー ス ・ プ ログ ラム を 


作っ た り 。 コ ー ド と デー タ ・ セ グ メ ント を オー バラ ッ プ きせ な いよ うに する な ど , いく つか の 指示 を 
XLT86 の 実行 時 に パラ メー タ と し て 与え る こと が で きま す . 


5 英 姓 導 高 衣 言 話 に よる 
応 一 地 症 ソ フル 月 発 区 


習 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


CP/M は , 高級 言語 の 分 野 に お いて も , 他 の OS に 比べ 圧倒 的 に 優位 で す . 2 ~ 3 の 代表 的 な 言 
語 に と ど ま ら ず , いろ いろ な 言語 プロ セッ サ を 使い た い 場 合 ,、 どう し て も CPM に 頼ら ざる を 得 な 
い の で す . 

例え ば , 代表 的 な 言語 で ある COBOL で は , ANSI 標準 COBOL (ANSI X3.23 1974) の レベ 
ル II が 走り (CIS COBOL) これ は , プロ フェ ッ シ ョ ナル の プロ グラ マ が 十分 満足 で きる 内 容 で す ( こ 
れ に は 便利 な “COMPUTE”" ステ ー ト メン ト も 使用 で きる ). 

また , 今 ま で 限ら れ た 機種 で し か 利用 で きず , 使い た く て も 使え な か っ た 人 が 多い APL な ども , 
国内 の 販売 店 で 入手 で きる よう に な り ま し た . CPM 上 で 走る APL を 具体 的 に 紹介 する の は 本 書 
が 最初 と 思い ます が , APL が , CPM マシ ン 上 で 導 価 に 誰 も が 利用 で きる と いう こと は , スカ ラー, 
ベク トル , マト リッ クス な どの デー タ 解 析 , 数 値 解析 。 それ に グラ フィ ックス な どの 分 野 の 人 達 に 大 
き な 刺 激 を 与え る も の と 思わ れ ま す . 


この 章 で は , 一 般 の ユー ザー が , 容易 に 入手 可能 な 言語 を 11 種 類 取 り 上 げ ま し た . そこ で , 簡単 な 
問題 を 全部 の 言語 に 与え , その 問題 解決 を それ ぞ れ の 言語 で 実現 し て み ま し ょ う ). 

取り 上 げた 11 種 類 の 言語 と , その 商品 と メー カー 名 を 次 に 示し ます . 購入 先 な ど は 本 書 の 巻末 付録 
GE 示し て お きま す 、 


1. COBOL……CIS COBOL ( 米 MICRO FOCUS 社 ) 中 間 言 語 コ ン パイ ラ 

2 . FORTRAN……FORTRAN-80 ( 米 Microsoft 社 ) コン パイ ラ 

9 BASIC HO CB-80 ( 米 Digital Research 社 ) コン パイ ラ 

4 PASCAL……Pascal ン MT+ ( 米 Digital Research 社 ) コン パイ ラ 

5 .。 PL ン I……PL ン 1-80 ( 米 Digital Research 社 ) コン パイ ラ 

6 . PL ン M HOO PLMX ( 米 Systems Consultants 社 ) コン パイ ラ 

7 C……BDS C Compiler ( 米 BD Software 社 ) コン パイ ラ 

8. FORTH……Rgy FORTH (H リ ギ ー コ ー ポ レー ショ ン ) コン バイ ラ 

9 . LISP……muLISP ( 米 The SoftWarehouse 社 ) 中 間 言 語 コン パイ ラン イン ター プリ タ 
10. ALGOL……ALGOL-M ( 米 Mark Moranville) 中 間 言 語 コ ン パ イラ ノイ ンタ ー プ リタ 


ル 


11. APL……SOFTRONICS APLN80 ( 米 SOFTRONICS 社 ) イン ター プリ タ 


以上 の 言語 に 対す る 課題 は 次 の よう な も の で す . 
プロ グラ ム 名 は ,「SAMPLE」 と し ます . その 内 容 は 、 プ ログ ラム を 実行 し た 場合 の 具体 的 な スク 
リー ン 表 示例 で 示し ます . 
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首 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


A>( ブロ グラ ム 実 行 ) TSAMPLE」 プ ログ ラム を 起動 する . 


プロ グラ ム が 起動 する と , この プロ グラ ム の 意味 を 表す メッ セー ジ と 。, 
数 値 nm の 入力 を 求め る メッ セー ジ が 出力 され る . 


| 十 2 十 3 十 …n」 三 ーーX 例え ば 300 を 入力 し た . 


inputin」(n」ー に 1 …250) ュー |300/ 


ーーー n の 値 の 条件 , | 一 250 の 範囲 で な い の で 

input_ in (n ーー」 1 …250) I00 / 受け 付け られ ず , 再び 入力 を 求め る メッ 
ーー ッ グ が 

入力 きれ た だ n の 和仁 が 入る 。 | 

1 今回 は 100 を 入力 条件 に 合 到 


! 十 2 十 3 十 …100= テ ご 50500-ーーーーーー この よう に , 式 と と も に 答え が 出力 され る . 


実行 終了 答え . 


つま り , た だ の 数 列 の 総和 (1 十 2 十 3 十 …… 十 n ) を 求め る プロ グラ ム で す が , その 中 に は , コ 
ン ソ ー ル と の 入出 力 , 演算 , 判断 の 要素 が 入っ て いま す (入力 が 0 や , 1, 2, 3 の 場合 , 答え の 式 
が お か し いな ど ,。 細か いこ と に は 目 を つぶ っ て 下さ い ). 

で は , この 課題 「SAMPLE」 を , COBOL か ら 順 に それ ぞ れ の 言語 で 実現 し て 行き まし ょ う . 

ここ で は , これ ら の 言語 と その 使い 方 に つい て の 詳細 な 解説 を 行う の が 目的 で は あり ませ ん . 今 ま 
で 。 一 部 の ミニ コン ゼ ピュー タク や や, 大型 コン ピュ ー タ で し か 使う こと が で き な か っ た 萌 周 の 。 そ の アル 
セッ ト あ る い は サブ セッ トレ ベル の も の が ,CP/M マシ ン 上 で 簡単 に 使用 で きる と いう 事実 を 紹介 す 
る の が 目的 で す . 

言語 は 本 来 、 そ れ ぞ れ に 適する 分 野 が あり (PL プ I1 と か , C な ど , アセ ンプ ラ ・ レ ベル に 近い シス テ 
ム 記述 か ら , ビジ ネス ・ ア プリ ケー ショ ン の 記述 まで , 広く 利用 で きる 言語 も ある が ), それ ぞ れ の 特 
徴 を 生か し た サン プル ・ プ ログ ラム を 作れ ば な お 良い の で す が , ここ で は た だ , 各 言語 の 書き 方 や , 
雰囲気 を 比較 する 意味 で , 画 一 的 に 取り 扱っ て いる こと を ご 了承 下さ い . 


5.1 COBOL 


5.1.1 COBOL に つい て 


COBOL (Common Business Oriented Language) は , その 名 の 通り 事務 用 共通 言語 で あり , 身近 
な 例 で は , 銀行 の オン ライ ン ・ シ ステ ム や , 各 会 社 の 給与 ・ 人 事 その 他 の 会 社 経営 ンス テム な ど , 事 
季 分 野 の 大 半 の も の に 使用 され て いま す . 

COBOL は , 1959 年 に 事務 用 共通 言語 の 開発 を 目的 と し て 設立 され た 組織 で ある CODASYL (the 
Conference On DAta SYstems Language. コ ダ シ ル ) に よっ て , その 仕様 書 が 作成 され , 1960 年 に 
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一 般 に 公開 され まし た . 

この 仕様 書 に 基づき , 各社 が COBOL コン パイ ラ を 開発 し , 1960 年 末 に は , すでに RCA と UNIVAC 
が 完成 し て 両機 種 癌 で 同一 COBOL プ ログ ラム の 互換 性 の 実験 を 行い , 見 事 に 成功 し て いま す . この 
当時 の COBOL は , 現在 COBOL-60 と 呼ば れ て いま す . 

CODASYL と ANSI (アメ リカ 国立 標準 協会 ) と の 関係 は COBOL 文法 の 開発 を CODASYL が 
行い , その 標準 化 を ANSI が 行う こと に な っ て いま す . 

COBOL は , CODASYL の 管理 に より 常に 保守 改訂 が 行わ れ て お り , 他 の コン ピュ ー タ と の 互換 性 
が 極め て 良い こと は , 他 の 言語 に は な い 最 大 の 特徴 で あり , 投資 効率 の 高い 言語 で ある と 言う こと が 
で きま すず 。 

現在 の COBOL の 規格 は , 改訂 アメ リカ 規格 COBOL X3.23-R1974 が 多く 使わ れ て お り , JIS COBOL 
も これ に 準じ て いま す . 

CODASYL の 指示 で , COBOL の マニ ュ ア ル な ど に は , 必ず 次 の 文章 が 書か れ て いま す の て で 紹介 し 
天久 まし うう 。 


COBOL は 産業 界 の 言語 で , いずれ の 会 社 , 会 社団 体 、 あ る い は いか な る 組織 団体 の 所 
有 物 で も な い . 
いずれ の 参画 者 ,」 CODASYL プロ グラ ミン グ 言 語 委 員 会 も , この プロ グラ ミン グ ・ シ ス 
テム と 言語 の 正確 性 お よび 機能 に 関し て は , な ん の 保証 も し な いし , 一 切 の 責任 も 負わ 
な い . 


5.1.2 MICRO FOCUS 社 CIS COBOL に つい て 


CIS COBOL は , Federal High COBOL の GSA 仕様 に 一 致し て お り , CPZM マシ ン 上 で (例え 
ば あな た の PC-8001, 8801 で も ) ANSI X3.23 1974 COBOL の , それ も レベ ル II を 使用 する こと が 
で きま す ( 注 : ここ で 使用 し た CIS COBOL Version 4 . 4 は 。 レベ ル II の バー ジョ ン で は あり ませ 
ん 

CIS COBOL は , 次 の 8 つの モジ ュー ル を レベ ル I で 完全 に 実行 し ます . 


@ ニ ュー クリ アス (中 核 ) 

@ テ ー ブ ル ・ ハ ンド リン グ ( 表 操 作 ) 
@ シー ケン シャ ル 1/O ( 順 フ ァイル ) 
@ リ ラテ ィ ブ 1 ン O (相対 ファ イル ) 
@ イ ン デ ックス 1 ン O (索引 ファ イル ) 
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@ イ ンタ ー プ ログ ラム ・ コ ミュ ニケ ーション (プロ グラ ム 間 連絡 ) 

@ ソ ー ト ・ マ ー ジ (整列 併合 ) 

あ コ ミュ ニケ ーション シ (通信 ) …… た だ し 。 ハ ー ド ウェ ア の サポ ボー トド が され て いる こと (レポー ト ・ 
ライ みみ は な い )。 


また , 次 の モジ ュー ル は レベ ル 1 で 実行 し ます . 


@ セグメンテーション (区 分 化 ) 
@ ラ イブ ラリ (登録 集 ) 
@ デ バッ グ 


その 他 . ミニ コン ピュ ー タ や , 大 型 コ ンピュータ の COBOL で は サポ ー ト され て いな い COBOL の 
入出 力 モ ジュ ー ル に 内 蔵 さ れ た , 全 画 面 処理 用 の アド バン ス 画 面 形式 と ,. デー タ 入 出力 機能 . カー ソ 
ル の ダイ レク ト ・ ア ドレ ッ シ ン グ に よる デー タス 入出 力 機能 . その 他 . マイ クロ コン ピュ ー タ を 十分 に 
活用 する た め の い くつ か の 拡張 機能 が あり ます . 

また 。 CISICOBOE だ に は 。 ユーティ リア ティ と し て "HORMS=2 7 と いう 。 COBOL ツー スズ: ロー ド ・ 
ジェ ネ レ ー タ が 用 意 き され て お り ,CRT と 対話 形式 で 非常 に 能率 的 に プロ グラ ム を 作成 する こと が で き 
ます 。、 


5.1.3 CIS COBOL に よる 「SAMPLE」 プ ログ ラム の 作成 


まず 。 その ソー ス ・ プ ログ ラム を 次 に 示し ます . 

COBOL に 関し て は , 若干 "SAMPLE” プロ グラ ム の 仕様 と 異な る 箇所 も あり ます が , 大 形 コ ン ピ 
ュー タ で , COBOL の 専門 家 が 書く プロ グラ ム 風 に 書か れ て いま す . も ちろ ん , 主題 プロ グラ ム の 仕 
様 を 満足 する だ け で あれ ば , この 数 分 の 一 の ステ ッ プ 数 で 書く こと が で きま す . 


A>TYPE SARPLE.CBL ファ イル 名 の エフ ステ ンション は 何で も よい . 


* CIS COBOL sample program fo "APP11Cation CP/M" 。 


IDENTIFICATIODN DIVISION. 
PROGRAN-ID. SAMPLE | 


AUTHOR 。 Mr 。 MURASE 。! プロ プラム の 識別 . 
DATE-MRITTEN。 BB/2 さ / 1982 
DATE-COMP ILED- 日 /23/ 1 9B2 


ENVIRDNMENT DIVISION. 

SDURCE-CONMPUTER PC-BBO1wi thCPN4。 | コン ビュ ー タ の 物理 的 な も の に 関す る こと を 定義 . 
DBJECT-COMPUTER 。 PC-BBO1withCPN.。 | DISPLAY, ACCEPT で , 装置 名 を 省略 し だ 時 に , 
SPECIQL-NQMES . CONSDLE IS CRT. | CRT を 指定 する こと を 定義 . 


と アゲ の! 


COBOL 


DATA DIVISION。 オプ ジェ クト ・ プ ログ ラム に よっ て 処理 され る すべ て の デー タマ を , ご ご て 定義 する . 
MODRKING-STURAGSE SECTIDN. 使用 する 変数 は すべ て 定義 する . 


77 x PIC 。 (6) V ヶ 。 … 独立 項目 と し て いる .01xPIC 9GV9. で も よい . 
* ー 一 小数 点 以 上 6 析 , 以 下 1 桁 を 定義 
O1 CRT-TrTLE。 
O さ FILLER PIC  X(BO) VALUE SPACE。 
O さ TITLE-a PIC  X(BO) VALUE "1+2+ さ +。。。.n = xr。 
0O さ FILLER PIC  X(BO) VALUE SPA E。 9 
OS CRT-INPUT-TITLE 。 補え 
05 TITLE-B PIC  X(3Q) VALUE 。 
"1nDut n (n = 1。..250) ーー>00O" 。 
OS FILLER PIC  X(5O) VALUE SPACE. 


OS ERR-CUMMENT PIC  X(BO) VALUE SPACE . 
O3 CRT--ANSMER-AREA 。 


OS CUMMENTー-1 PIC  X(1O) 。 3 

OS  『NPUT-NOTE PiIC ZZ2、- は 上 位 の 0 を 表示 し な い . 

OS COMMENT-2 PIC  X(2) 。。 三 は 表示 する 桁 で , 編集 項目 で ある . 

OS ANSMER PIC 2272Z。Z29? 5 

OS CUR-SET PtC XH665= FILLER 以 外 の 変数 を 定義 する こと で , 


カー ソル を エリ ア 最 下部 に セツ ト ず する. 
Q1 CRT-INPUT-AREA-SET REDEF INES CRT-TITLE. 
O さ FILLER PIC  X(26 フ 7) 。 
0O さ INPUT-DATA PIC 9(③) 。 
PROCEDURE DIVISIDN. デー 処理 部 . 
まま 。 INITTAL-BET * ま を 


IOVE ZERO TOD X。 
DISPLAY SPACE。-- 画 面 全体 を フリ ア . 
MOVE SPACE TO CRT-ANSMER-AREA。 答え エリ ジ を グフ リア. 


TITLEDUT-ACCEPT 。 
⑧ ぐ て DISPLAY CRT-TITLE、 初期 画面 表示 . 
⑤-ー DISPLAY CRT-INPUT-AREA-BET . そこ に カー ソル を セッ ト . 
⑥-- ACCEPT CRT-INPUT-AREA-BET 。 デー タ 入 力 . 


* ネ ホ 。 じ HECK DATN まま 
IF INPUT-DATA < 251 


THEN MOVE SPACE TO _ ERR-CDMMENT | 
MOVE "1+2+ さ +。 。 。。" TH COMMENT-1 答え エリ ア の 表示 内 容 の セッ ト . 
INOVE INPUT-DATA TO INPUT-NOTE 1 
MOVE " =" TO CDMMENT- ス 

ELSE MOVE "INPUT ERROR ! ーーーー> RETRY PLEABSE な 


TU ERR-CDMMENT 入力 信 エ ラー の 時 . 
SO TO TITLEDUT-ACCEPT 。 | 


本 ※ 。 CUMPUTE まま 
ADD 1 INPUT-DATA TO X. | 
MULTIPLY O.5 BY X. て の 議 和 5 
MULTIPLY X BY INPUT-DATA GIVING ANSwER 。 
⑥)= DISPLAY CRT-TITLE 。 画面 全体 (今回 は , 答え エリ ア に 内 容 が 入 つ て いる ) を 表示 . 


STOP RUN. 


Figure-5.1.1 COBOL に よる SAMPLE” の ソー ス ・ プ ログ ラム . 


CIS COBOL の ソー ス ・ フ ァイル 名 の エク ステ ンション は , 任意 の も の で か まい ませ ん . 
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ここ で は n まで の 総和 の 計算 を , ルー プ を 使わ ず , 
(《 各 手 11)※0。5) 近 三光 


と いう 式 で 求め て いま す . 
スク リー ン へ の 表示 は , CRT 全体 を 各 変数 で 分 割 し て 表示 位置 を セッ ト し て いま す . その 変数 と CRT 
の 関係 を 次 に 示し ます (この よう な 手法 を 用 い ず に , も っ と 簡単 に 表示 で きま す が ). 


(CRT 一 TITLE)…CRT 全 体 の 名 前 . 


@ て 入力 用 コメ ント 表示 の 
内 容 を , 初期 値 と し て 持つ . 
@ | 行 は 80 文 字 に 分 割 . 


@ 

を 実行 する こと に より , この 位置 に 
カー ソル が セッ ト さ れる . 

⑥ を 実行 する こと に より , 3 桁 の 数 字 
を INPUT 一 DATA か ら 受 け と る . 
入力 値 エ ラー の 時 , コメ ント を 入れ る . 
OK の 時 は スペ ー ス を セッ ト . 


FILLER X(50) 
ERR 一 COMMENT X(80) I 


(CRT 一 ANSWER 一 AREA) 


3 計算 結果 を 表示 する エリ ア 
< を o を 定め る . 

⑳ の 時 は , 全体 に スペ ー ス を 
セッ ト す る . 


Figure-5.1.2 CRT 全 体 を 各 変 数 で 分 割 し た 図 


さて 。 次 は と の ツー ス *・ デ ログ ラム SAMPLE . CBLY を コン シッ パイ ル 渦 まず 、 
コン パイ ル し て その プロ グラ ム を 実行 する た め に 必要 な 最低 限 の 各 フ ァイル を , STAT コマ ンド 
で 示し て お きま す (も ちろ ん CIS COBOL の パッ ケー ジ に 含ま れ て いま す ). 


>BSTAT \。 キ / 


も Acc 

さ R/M AaCOBOL 。 CDN コン バイ ラ の ルー ト ・ ブ プログラム. 
1 R/M iCUBOL . 1O1 

1 R/M aiCOBOL . 1O2 
1 

1 

さ 


R/M AsCOBDL。 1O ミ コン バイ ラ ヲ ラ の オー パレ イ ・ モ ジュ ー ル . 
R/M AiCOBOL . 104 
R/M AzRUN。CON ラン タイ ム ・ シ ステ ム 
1 R/M AsSAMPLE。CBL SAMPLE? プ ログ ラム の ソー ス ・ フ ァイル . 
Bytes Remaining ロ n Qi 140k 


AA> 


Figure-5.1.3 CIS COBOL の コン パイ ル と プロ グラ ム の 実行 の た め に , 最低 限 必要 な 各 フ ァイル . 
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コン パイ ラ の 実行 と , 生成 され た ファ イル の 確認 な どの 実行 例 を 次 に 示し ます . 


RA>DIR SANfPLE.*) コン バイ ル 前 の "SAMPLE* フ ァイル を すべ て リス ト ア ウト . \ 


Az SAMPLE CBL ソー ス ・ フ ァイル の み 存 在 する . 
QA>EOBOL SAHMPLE .CBL ) ソー ス ・ フ ァイル SAMPLE. CBL“ に 対し , コ ン バ パイ ラ を 実行 する . 


** CIS COBUL V4.4 CUPYRIGHT (C) 197 ロ 。1981 MICRD FOCUS LTD 
*#*CHMPILING SAMPLE . CBL 


** ERRDRS=OOOQOO DATA=OO977 CUDE=OO3O さ DICT=OO さ ささ 』 09126/09459 GSRA FLQAGS= OFF 
エラ ー な し で コン バイ ル 成 功 . 


RA>DIR BAMPLE。* ) コン バイ ル 終 了 後 , す べ て の *SAMPLE* フ ァイル を リス ト ア ウト . 


Ri SAMPLE CBL =』 SQMPLE INT 』 SAMPLE  LST …. INT フ ァイル と LST フ ァイル が 
ソー ス ・ フ ァイル 中 間 コ ー ド ・ フ ァイル リス ト ・ フ ァイル . ・ 生成 され て いる 


人 A>BaSTAT SAMPLE.IiNT/ - 中 間 コ ー ド ・ フ ァイル の 容量 を 調べ る . 


RECS BYTES EXT ACC 


11 2K 1 R/M AkSaMPLE . INT 2K バ イト 長 で ある . 
BYTES REMAINING UN As 1 くさ 1 に K 


谷 > 


Figure-5.1.4 CIS COBOL の コン パイ ラ の 実行 と 、 生 成 さ れ た ファ イル の 確認 . 


コン パイ ル は 成功 し て , 2 K バ イト の 中 間 コ ー ド の ファ イル "SAMPLE . INT′ と ,。 リ スト ・ フ ァ 
イル “SAMPLE . LST” が 生成 され て いま す . 

で は , SAMPLE” プロ グラ ム を 実行 し て み ま し ょ う 。 中 間 コ ー ド の プロ グラ ム を ラン タイ ム ・ シ 
ステ ム “RUN . COM” で 実行 し ます . 


>RUN SAMPLE . INT / コン バイ ル さ れ だ *SAMPLE* プ ログ ラム の 実行 . 


ラン タイ ム ・ シ ステ ム を 起動 し て 実行 させる, 


Figure-5.1.5 CIS COBOL で 作成 され た SAMPLE” プロ グラ ム の 実行 . 


ラン タイ ム ・ シ ステ ム と , 中 間 コ ー ド ・ フ ァイル が メモ リ 上 に ロー ド さ れる と 実行 開始 と な り , ス 
クリ ー ン 全体 が クリ ア さ れ て , 次 の よう に 表示 され ます . 


1+2+ さ +。。。-n = ※ RE: 


1 t n (n = 1...25O) 2 251 以 上 を 入力 し だ だ め , エラ ー・ メ ッ セ ー ジ 
1NPUT ERRDR ! ーーーー> RETRY PLEABE が 出力 され て , 元 の 位置 に カー ソル が 戻 つ だ . 


Figure-5.1.6 "SAMPLE" プロ グラ ム の 実行 ①. 入力 値 エ ラー の 例 (エラ ー・ メ ッ セ ー ジ が 出力 され 
る 点 は , 仕様 と 異な り ま す ). 
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前 の リス ト の “300" を “100” と 書き 換え て 実行 する と , 次 の よう に な り ま し た . 


1+ つ 2+ さ +。。。。n ロ = 


input n (n = 1...25O) ーー>1OO 7 …-- 適 正 な 値 を 入力 . 


1+2+ さ +。 。 。。1OO = 5。OSO 入力 値 と 答え が 出力 され て いる . 


AA> CP M に 戻 つ だ . 


Figure-5.1.7 "SAMPLE” プロ グラ ム の 実行 ②④, 適正 な 入力 値 の 例 . 


参考 まで に , コン パイ ル 時 に 生成 され た リス ト ・ フ ァイル の “SAMPLE . LST” の 一 部 を 次 に 示し 
お きま す 。 


RA>TYPE SAMPLE-.LST / 


** CIS COBODL V4.4 SAMPLE . CBL 
1 1 
* CIS COBOL sample program foO ビ "PP11 と Cation C ビ P/M" キ 


IDENTIFICATIUN DIVISION. 
PROBRAN-1』 D SANMPLE - 
AUTHOR . Ir - NURASE 
DATE-WRITTEN- 8B/2 く / 1982 
DATE-COMP ILED. B/23/ 1982 
し 1 
ENVIRUNMENT DIV1S1ON. 
SDURCE-CODMPUTER . P ビ ーBBO1 wi モ hCPN 。 
0BJECT-CUMPUTER PC-8BBO 1 wi 上 hCFPN。 
SPECIAL 一 NQNES 。 CONS0LE LiS CRT.。 
に 1 
DATA DIVISION. 


MDRKINB-STDRABE SECTION. 
EE (6) V9。 


QO1 CRT-TITLE. 

O さ FILLER X(BO) VaLUE SPACE. 

O さ TITLE-A X(BO) VALUE "1+2+ さ +。。。。n = x"。 

COUMPUTE  * ネ を 

ADD 1 INPUT-DATA TO X. QOB1 

MULTIPLY 0.5 BY X. ooCe 

MULTIPLY X BY INPUT-DATA GIVING ANBMER. 【 い に 

DISPLAY CRT-TITLE. QOE8 

O1OB 

STOP RUN- OioB 
** CIS CDUBOL V4.4 REVISION 1 URN AV/OO0* 7 。 8 
** CDMPILER COPYRIGHT (C) 1978。1981 MICRD FOCUS LTD Se 
*# ERRDRS=OOOOO DATA=OO97 ア CODE=OOsO ミ DICT=OO さ ささ 』 O9126/O9459 GSA FLQABS= OFF 0 


Figure-5.1.8 コン パイ ル 時 に 生成 され た リス ト ・ フ ァイル の 一 部 を タイ プア ウト . 
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CIS COBOL の その 他 多 く の 機 能 の 紹介 は 省略 し ます . 


5.2 FORTRAN 


5.2.1 FORTRAN に つい て 


FORTRAN (FORmula TRANslator) は , 科学 技術 計算 用 の 言語 で あり , 1958 年 に IBM が 改訂 
版 の FORTRAN II を 発表 し . その コン パイ ラ が 作ら れ て か ら 一 般 に 広く 普及 し 始め まし た . その 後 , 
1962 年 に FORTRAN IV と その コン パイ ラ が 発表 きれ , これ が 現在 の 標準 化 さ れ た ANSIFORTRAN 
の 基 と な っ て いま す . 

日 本 の JIS FORTRAN の 最高 水準 7000 は , ANSI の FORTRAN に 準 じ て い ます . 

FORTRAN は , な ぜ か 日 本 で は 非常 に も て は や され て いる 言語 で あり , COBOL に 次 いで 多く 使 
われ て いま す . 

プロ グラ ム の 書き 方 は , BASIC 言語 に よく 似 て いる の で (BASIC が FORTRAN に 似 て いる の 
で ある が ), BASIC 言語 の 書け る 人 な ら 少 し の 学習 で FORTRAN が 書け る よう に な る で し ょ う . 


5.2.2 Microsoft 社 FORTRAN-80 に つい て 


FORTRAN-80 は , ほぼ , JIS FORTRAN の 水準 7000 を 満た し て いま す が ,、 い くつ か の 拡張 機能 と 
制約 事項 が あり , それ を 次 に 示し ます . 


FORTRAN JIS 水準 7000 の 上 に 拡張 され た 機能 . 

(1) STOP 文 , PAUSE 文 に "STOP C” また は “PAUSE C” と C が 使用 きれ る と き に , C は 6 
文字 の ASCII コー ド が 使用 で きる . 

(2) READ 文 も し く は WRITE 文 の 中 に , ERR ニ お よび END= と 書い て 入出 力 時 エラ ー が 発生 し 

た と き , お よび 入出 力 時 の ファ イル が 終了 し た と き の 分 岐 を 書く こと が で きる . 

) PEEK, POKE, INP お よび OUT 機能 が 付け 加え られ て いる . 

) 文 関数 で 添字 の つい た 変数 を 使う こと が で きる . 

) 整定 数 が 使用 で きる と ころ で は , 16 進 数 も 使用 で きる . 

) 文字 デー タ の 列 (アポ スト ロフ ィ で くく られ た 文字 ) が nH の 形 の 代わ り に 使用 で きる . 

) 文字 デー タ は , 整定 数 と し て の 式 の 中 で 使用 する こと が で きる 。. 

(8) 継続 行 の 数 に 制約 は な い . 

(9) 各種 の 型 デ ー タ を 式 の 中 , また は 代入 文 に 用 いる こと が で きる . また 変換 は 自動 的 に 行わ れる . 
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FORTRAN JIS 水準 7000 に 対し て 次 の 制約 が あり ます . 


(1) 複素 数 型 の デー タ が 使用 で き な い . 
(2) 宣言 文 は つぎ の 順 計 に な っ て いな けれ ば な ら な い . 
@ PROGRAM 文 , SUBROUTINE 文 」FUNCTION 文 」 BLOCK DATA 文 
@ 型 家 言 文 、EXTERNAL 文 , DIMENSION 文 
@ COMMON 文 
@ EQUIVALENCE 文 
@DATA 文 
@ 文 関数 
(3) デー タ の 型 に 応じ し て コ ンピュータ の メモ リ を 占め る 大 き さ が 異な る . 整数 、 実 数 、 倍 精度 実数 
お よび 論理 型 に 応じ て 必要 な メモ リ の 容量 が 異な る . 
(4) 代入 文 に お ける 符号 お よび DO 文 の 最初 の コン マ は , その 文 の 開始 行 に 現れ な けれ ば な ら な い . 
(5) 入出 力 並 び の 要素 と し て , 複数 個 の デー タ を か っ こ で くく っ た 形 は 使用 で き な い . 


FORTRAN-80 は , FORTRAN で 書か れ た ソー ス ・ フ ァイル (ファ イル 名 の エク ステ ンション は `EOR?) 
を コン パイ ル し 。 リ ロケ ー タ ブル ・ オ プ ジ ェ クト ・ フ ァイル (マイ クロ ソフ ト ・ リ ロケ ー タ プル ・ オ 
プ ジ ェ クト ・ フ ォ ー マ ッ ト . エク ステ ンション は "REL”) を 生成 する コン パイ ラ で す . 生成 され た REL 
ファ イル は , 付属 の LINK-80 (リン ク ・ ロ ー ダ ) に より , FORTRAN の ライ ブラ リ と の リン ク , そ 
れ に アセ ンプ ラ や 他 の 言語 に よる REL ファ イル と の リン ク を 行う こと が で きま す . 


5.2.3 FORTRAN-80 に よる 「SAMPLE」 プ ログ ラム の 作成 


まず 。 ジー ス ・ プ ログ ラム を 決 に 示し ます 。 


A>TYPE SAMPLE。FOR ファ イル 名 の エフ ステ ンション は , FOR* と する . 


FOURTRAN-BO 1 ram 11 Cat ュ CP/M" ーー- 行 の 最初 が "C" で 始ま る 行 は , 
の ドー コメ ント と な る . 


INTEBER _N。 NUMB。 TEMP -…-- 名 変数 の 定義 . 


** Title out 
MRITE (1。 100) タイ トル の 出力 . 
10O FORMAT (1H 。 15H1+2+ さ +。。。.n = メ /) 
記 


キキ TnDut ms5a ロ @ 〇 ut。 Key 1nDut and Check ] 
10 MRITE (1。 20O) ー ジ の 出 
200 FORMAT (1H+。 27Hinput n (n = 1...25O) ーー>》) 1 へ 22 カ . 
READ (1。 さ OO) N 
さ OO _ FORMAT (11O0) 数 値 n の 入力 と その チエ ッ フ . 
IF (N。LT。1 。OR。 N.GT.25O) GO TO 10 
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FORTRAN 


1 
C ネ * COmpute 
NUMB = N 
TEMP = N 
2O NUMB = NUMB - 1 n ま で の 総和 の 計算 . 
IF (NUMB .EQ. O) GO TO 3o 
TEIMP = TEMP + NUMB 
GO TO 20 
9 
C \ キ Ans5wer Out 
さ O_ MRITE (1。 400) N。 TEMP | だ 
400 FORMAT (1H 。 10H1+2+ さ +。。。。。 16。 さ H = 。 15/ ノ ) 」 告 え が 表示 され て いる . 
STOP 


END 
N、 > 


Figure-5.2.1 FORTRAN に よる “SAMPLE” プロ グラ ム の ソー ス ・ フ ァイル . 


ソー ス ・ プ ログ ラム を コン ペイル し て , FORTRAN の ライ ブラ リ と リン ク し , 実行 可能 な オプ ジェ 
クト ・ フ ァイル を 生成 する に は , 最低 限 , 次 に 示す ファ イル が 必要 で す (も ちろ ん FORTRAN-80 の 
パッ ケー ジ に 含ま れ て いま す ), 


AA>BsGTRT # き 。*/ 


RecC5s Bytes Ex AccC 
213 27k 2 R/w AkFBO.COM コン バイ ラ . 
207 26k 2 R/M AsFDRLIB.REL リロ ケー タブ プル ・ オ プ ジ エ クト 形式 の 各種 ライ ブラ リ . 
B4 11k 1 R/M azLBO.CDM リン ジー ロー ダ : 
に 】 1k 1 R/M AiSAMPLE。FOR “SAMPLE プロ グラ ム の ソー ス ・ フ ァイル . 
Bytes Remaining Un as 176k 


> 


Figure-5.2.2 FORTRAN-80 の コン パイ ルー リン ク 一 実行 に 必要 な 最低 限 の 各 フ ァイル . 


で は , コン パイ ル の 作業 を 始め まし ょ う . 各 時 点 で の DIR コマ ンド に よる “SAMPLE” ファ イル 
の 確認 を し な が ら , コン パイ ラ の 実行 と リン ク ・ ロ ー ダ の 実行 例 を 次 に 示し ます . 


Mg 
As SAMPLE FOR SAMPLE" ファ イル は , ソー ス ・ フ ァイル の み 存 在 . 


A>FBO_SAMPLE。,SAMPLE=SAMPLE ) コン バイ ラ の 実行. 標準 的 な コマ ンド ・ ラ イン で あり , 
REL フ ァイル と , PRN フ タイ ル を ディ ス フ 上 に 生成 する . 
ま MAIN 


RA>DIR SAMPLE。 ま 7 生成 さ れ だ ファ イル の 確認 . 
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人 As SAMPLE FOUR 』 SAMPLE PRN 』 SAMPLE REL 


ソー ス ・ フ ァイル リス ト ・ フ ァイル リロ ケー ブル オブジェ クト ・ フ ァイル 
終了 と 同時 に CPM に 戻る . 


A>LBO SAMPLE/E, SAMPLE /N / リン フ ・ ロ ー ダ の 実行 . 標準 的 な コマ ンド ・ ラ イン で あり ,COM フ ァイル が 


生成 れる "COM" フ ァイル を ディ ス フ に セー プ す る . ディ スク 上 に 生成 され , 終了 後 は CP "M に 戻る . 
Link-BO さ .4 O9-Dec- 日 1 Copyright (c) 19 昌 1 MiCFO5Of モ 

Data OQ1O さ 1B74 くら 6769> 

24819 Bytes Free 

EO16F 1B74 27 1 

A>DIR_ SAMPLE。 ま ) 生成 され た ファ イル の 確認 . 


ns SANMPLE FOR : SQMPLE PRN 』 SAMNPLE RKEL 』 SAMPLE COH 
実行 可能 な 純 マ シン ・ コ ー ド の ファ イル が 


生成 され て いる . 
QR>BsSTQAT BANMPLE . ヒロ NM / ヾ SAMPLE. COOM” の 
容量 の 確認 . 
RECS BYTES EXT ACC 
トト 】 7K 1 R/M nsSAMPLE. CDM ドバイ ト 長 で ある . 
BYTES REMAININB UN Ai 164K 
AA> 


Figure-5.2.3 FORTRAN-80 に よる コン パイ ラ の 実行 、 リ ンク ・ ロ ー ダ の 実行 と 生成 され る ファ イル の 
確認 . 


で き 上 っ た SAMPLE . COM” を 実行 し て み ま し ょ う ). FORTRAN-80 は コン パイ ラ な の で , 
"SAMPLE . COM” 単独 で 実行 で きま す . 


っ 
A>SAMPLE ) SAMPLE* プ ログ ラム の 実行 . 


1+2+ さ +。。。。n = 


input n (n = 1。..250) ーー>2907 -…-251 以 上 の だ め 入力 エ ラー と な る . 
input n (n = 1。.。..25O) ー->200O ) -- 再 度 正 し い 値 を 入力 . 


1 +2+ さ +。。。。 20QO = 2010O 入力 し だ 値 と 答え が 出力 され だ . 
STOP FORTRAN 一 80 の シス テム か ら の 出力 . 


欠 > 


Figure-5.2.4 FORTRAN-80 で 作成 され た “SAMPLE” プロ グラ ム の 実行. 


参考 まで に , リス ト ・ フ ァイル の “SAMPLE . PRN” の 一 部 を 次 に 示し て お きま す . 


>TYPE SAMFPLE.PRN / 
FORTRAN-BO Ver. さ .44 Copyright 197Bー1981 ( ビ ) By 1 と CFO5Oft 一 oe 16966 


Createds 10-Dec- 日 1 
1 C FOURTRQAN-BO sample program for "PP11iCation CP/M" 


2 コウ 


FORTRAN 


2 C 

さ C 

し 】 INTEGER N。 NUMB。 TENMP 

ト に] C 

に -】 9 キキ 本 上 1@ Out 

7 MRITE (1。 1OO) 

し 4 1 1 1 1 0000* LXIi B 。 生ま し 

L11111 000 さ ? JINMP 生 INIT 

3.1111 OOO6* LXI D。 10OL 

し も 1 1 1 1 OOO* LXI H。EO1 OO QO OO 

L3 すす 3 1 OOOC* CALL に バア コ 

日 10O FDRMAT (1H 。 15H1+2+ ォ さ +〆。。。n = x/) 
1 1111 OQOF* CALL 征 ND 

L/ ビ 

10 1m キネ TnDUut mes55adG 〇 ut。 Key 1nput and Check 
11 10 MRITE (1。 200) 

L も .1.1 4 1 OO12* LX1 D,200L 

L11111 OO15* LXI H。EO1 OO QQO QO1 


し 4 1 1 1 1 OO18* CALL バア 4 


27 400 FORMAT (1H 。 10H1+2+ さ +』。。。。 16。 さ H = 。 15//) 
キネ まま 。。 OO”  LXI B,TEMP 

* ネ まま OO9D"  LXI D。N 

OOaO” 。 LXI H。[O1 Oo oo oo] 

まま OOA さ " MVI A。O さ 

まま OOa5" 。 CALL *1O 

まま を 。。 OOaB" CALL *ND 

28 TnP 

* キ まま OOaB" CALL *5T 

29 END 


ト す 11 3 1 OOAE* 20202020202O 
ト す すす 31 OOB4”* O1 OO 0O QO 


Program Unit Length=OOBB (184) Bytes 
Data Area Length=OO6C (108) Bytes 


Subroutines Referen こ eds 


生 1O INIT M2 

生 ND KR2 ST 
Variabless 

N QOO1" NUIB OOQOQ さ " TENP OOQ5" 
Ts OOOOO2 OO049『" TiO1OOO2 OO4A" 

Labe1 ss 

し OQQ6”* 1OOL QOO7" 10L OO12* 
200L OO20" さ 3OOL O044" 20L OO6C* 
さ 0L O091? 400L OO4B" 


et | 


Figure-5.2.5 コン パイ ル 時 に 生成 され た リス ト ・ フ ァイル の 一 部 を タイ プア ウト . 


FORTRAN-80 の その 他 の 多く の 機能 の 紹介 は 省略 し ます . 
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5.3 BASIC 


5.3.1 BASIC に つい て 


BASIC は も う 言 わ ず と 知れ た BASIC で あり , パソ コン =BASIC, 世の中 の コン ピュ ー タ は す 
べ て BASIC, と 思い 込ん で し まっ て いる 人 も いる くら いで あり , それ ほど 普及 し て いる 言語 で す . 

BASIC の 名 は , 一 説 に よる と Beginner's All-purpose Symbolic Instruction Code に 由来 する と 
言わ れ て いま す が , 筆者 個人 的 に は た だ , 「 基 礎 の 」 と か 「 初 歩 の 」 と いっ た 意味 で の basic” を と っ 
た も の で ある 方 が “BASIC” らし い の で は な いか と 思っ て いま す . 

BASIC は , 米国 Dartmouth 大 学 の ]. G. Kemeny と , T.E. Kurtz を 中 心 に 開発 され た , 会 話 型 
の プロ グラ ミン グ 言 語 で あり , FORTRAN に 非常 に よく 似 て いま す . 一 般 に 使わ れ 始 め た の は , 1965 
年 に GE235 シ ステ ム に イン プリ メン ト さ れ て か ら で あ る と 言わ れ て いま す . 

開発 当初 は 大型 マシ ン の TSS で 使用 する 目的 で あっ た の で す が , マイ クロ コン ピュ ー タ の 稀 異 
的 な 発達 の お か げ で , 今 で は 各 家 庭 や オフ ィ ス の パー ソナ ル ・ コ ンピュータ で 主 に 使用 きれ て お り , 
言語 の 機能 も 。 当初 の スー パー・ ス ー パ ー・ セ ッ ト と 言え る ほど 拡張 され て いま す . 

BASIC の コン パイ ラ は , マイ クロ コン ピュ ー タ 用 の も の が 実現 きれ て お り , BASIC も 実務 レベ ル 
で 本 格 的 に 利用 で きる よう に な り ま し た . コン パイ ラ 型 BASIC に つい て は , 本 書 3 . 4 章 で マイ クロ 
ソフ ト 社 の “BASCOM” を ,、 当 項 で デジ タル リサ ー チ 社 の “CB-80” を 取り 上 げ て いま す . 


5.3.2 Digital Research 社 CB-8O0 に つい て 


(CB-80 は Compiler System 社 の 製品 で ある が , 1981 年 秋 に 同社 は Digital Research 社 と 合併 し た ) 

CB-80 は ,. アメ リカ で ビジ ネス ・ ユ ー ス と し て 最も 広く 使用 きれ て いる CBASIC (Digital Research 
社 . 事務 用 の 中 間 コ ー ド ・ イ ンタ ー プ リタ 型 BASIC) と ソー ス ・ フ ァイル の コン パチ ビリ ティ を 持っ 
た 、BASIC コシ パイ ラ で す 。 

CB-80 は , CB-80 コ ン パ イラ と ライ ブラ リ , それ に リン ク ・ ロ ー ダ か ら 構 成 さ れ , BASIC 言語 の ソ 
ー ス ・ プ ログ ラム を , マシ ン ・ コ ー ド の リロ ケー ブル ・ オ プ ジ ェ クト ・ モ ジュ ー ル に コン パイ ル し ま 
す 。 生成 され だ た リロ ケー タブ プル ・ オ プ ジ ェ クト ・ モ ジュ ー ル は 。 リ ンク ・ ロ ー ダ に より , CB-80 の ライ 
プラ リ ・ モ ジュ ー ル や 必要 で あれ ば 他 の 言語 か ら 生 成 さ れ た モジ ュー ル と の 結合 を 行い , 実行 可能 
な 1 本 の マシ ン ・ コ ー ド プロ グラ ム を 生成 し ます . 

CB-80 は , 従来 の BASIC に は な い , 数 々 の 特徴 を 持っ て いま す . 


234 


BASIC 


@ ライ ン No を 一 切 必 要 と し な い . GOTO お よび GOSUB に は ラベ ル を 使用 で きる (ライ ン No を 付 
け て も か まわ な い が ). 

@ 従来 1 行 に 記述 し な けれ ば な ら な か っ た も の が , 複数 行 に わた っ て 記述 で きる . よっ て , 複数 
行 に わた る 関数 も 自由 に 定義 で きる . 

@ リロ ケー タブ ル ・ マ クロ ・ ア セン プラ で 使用 する も の と 同じ 機能 を 持つ PUBLIC′ (3.2, 3. 
3 章 参 照 ) 宣言 を 他 の モジ ュー ル に 対し て 行え る . 

@ フ ァイル の ラン ダム ・ ア クセ ス の 手続 が 簡単 で ある . 数 値 を 文字 列 に 変換 する 必要 が な い . 

@ %INCLUDE 文 に より , 別 の ソー ス ・ フ ァイル を 任意 の 場所 に 挿入 し な が ら コ ン パ イル を 行う こ 
と が で きる 。 

@ その 他 い くつ か あり ます が 省略 . 


な ど で あ り , 何と 言っ て も 最大 の 利点 は 。 ア セン プラ 言 語 を 記述 する 感覚 で , BASIC 言語 を 記述 で き 

る と いう こと で し ょ う . その た め , 構造 化 プ ログ ラミ ング が 格段 に 行い や すく な っ て いま す . 

従来 の ライ ン No 付 き の BASIC で は , と て も 書け な か っ た り , 書く 気 に は な れ な か っ た プロ グラ ム 

で も , CB-80 の 記述 法 で な ら 可能 と な る も の が 多い と 思わ れ ま す . 

注 ) 巻末 の 付録 B に 、CBASIC, CB-80, MBASIC,。 それ に BASCOM の ステ ー ト メン ト お よび 
関数 の 一 覧 表 を 載せ て あり ます . 参照 下さ い . 


5.3.3 CB-8O に よる 「SAMPLE」 プ ログ ラム の 作成 


まず , その ソー ス ・ プ ログ ラム を 示し ます . ファ イル 名 の エク ステ ンション は , "BAS* が デフ ォ ー 
ルト と し て 指定 され て いま す が , 何で あっ て も 構い ませ ん . 


ライ ン No. が 全く な い の と , 自由 な 書き 方 に 注目 . 
A>TYPE SAMPLE。BAS フジ アイ ル 名 の エフ ステ ンション は 何で も よい が “BAS" が ガ デ フ オ ー ル ト 名 で ある . 
導 CB-BO sample program for "APpP11cCation CP/M" 。 学 2 


PRINT 
PRINT りす す 2+ る + 。。。。n = % リ 
INP. MSGDUTi ラベ ル を 使用 で きる . ラベ ル に ピリ オド を 含め て も よい . 
INPUT "inPut n (n = 1。...25O) ーー>" ま s INPVAL 
IF (INPVAL く 1 ) ロ R (INPVAL >25O〉 


THEN TO INP - MSGDUT 
es 導 イス 4 で うー 同一 行 に 書 
けれ ば な ら な いも の を , こ の よう に 


党 こ OmDUt@ 
GOSUB CALC.SUB-… ラ ベル で サブ ルー チン を 中 ん で いる . B に 2 け て 莉 く こと が で きる 


常 Out result 


2 つ 3 ら 5 
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PRINT "1+ す 2 て さて 。。。。" 5 INPVAL 3 "= " ョ 3 ANSX 
STnP \programm Fun ewnd ーー プロ グラ ム の 実行 の 終わ り は END で は な ぐ STOFP. 


学 こ a1C 品 い DO 〇 ut キュ n@ 
CALC。SUB3 ラベ ル 


P= TINPVAL+1 
NSX= P * O.5 * INPVAL 
RETURN 
\ し Li st end。 
人 > 
Figure-5.3.1 BASIC コン パイ ラ CB-80 で 書い た SAMPLE” プロ グラ ム の ソー ス ・ フ ァイル . 


この ソー ス ・ プ ログ ラム を コシ パイ ル し 。 ラ シタ イム ・ ラ イブ ラリ を リン ク し て 実行 する に は 。 CB 
-80 の パッ ケー ジ の 中 か ら , 最低 限 次 の 各 フ ァイル が 必要 で す . それ ら を STAT コマ ンド で 次 に 示し 
ま 生 。 


>BsSTQAT #。* リ 


Recs Bytes Ex モ の QCC 


41 6k 1 R/M AsCBBO.。COM 一 ー コ ン バ パイ ラ の ルー ト ・ プ ログ ラム . 
106 14k 1 R/M QiCBBO. ロ V1 
106 14k 1 R/M AsCBBO。DV2 : コン パイ ラ の オー バレ イ . 
125 16k 1 R/M iCBBO. ロ VS 
156 2Ok 2 R/M ACBBO。 IRL 一 ラン タイ ム ・ ラ イブ ラリ 
55 アフ k 1 R/M AsLKBO。 CDM リン フロ ー ダ . 
4 1k 1 R/M AzSAMPLE 。 BAS SAMPLE" の ソー ス ・ プ ログ プラム. 


Bytes Remalining ロ n ni 16 さ k 


仙 > 


Figure-5.3.2 CB-80 の コン パイ ルー リン ク … 実 行 に 必要 な 最低 限 の 各 フ ァイル . 


で は , コン パイ ラ を 実行 し ます . ソー ス ・ フ ァイル 名 の エク ステ ンション が BAS* の 場合 は , "BASY 
を 省略 で きま す が , “BAS? 以外 の 場合 は ,. フル ネー ム で ソー ス ・ フ ァイル 名 を 指定 し ます . 


レーーーーーーーーーーーーーーーー 


A>DIR SAMPLE。$/) SAMPLE" に 関す る ファ イル を 調べ る . 
Rs SAMPLE BASB ソー ス ・ フ ァイル の み 存 在 し て いる . 


A>CBBO_SAMPLEEB]) ソー ス ・ フ ァイル "SAMPLE. BAS" を コン バイ ル . 

^[S]"『 に より , REL フ ァイル 中 に シン ボル - ロ ケー ショ ン 情 報 を 含め る . 
CBBO Verswion 1. さ Seria1l No。 OZ72-OOOO_ Copyright (c〉 

19 昌 1 Digita} Resea レ Ch。 InC。 人 Q1 1 1 ロ hte と G5 ほ rvYed 


BASIC 


end of pass 1 コン バイ ラ 実 行 中 の 各 パ ス が 表示 され , リス ト ・ フ ァイル が コン ソー ル に 出力 され る 
hd Of Das 2 
1s OOSch \\ CB-BO sample program for "APpP1icCation CP/M" 。 学 
2』 OOSch 
さ 』 OOSch 
4』 OOS5ch INTEGER 1。H。 人 の 
Ss OOSch 
6』 OOSch 潮 1 ロ DU mm 曲 呈 aG Out 
7』 OOSch PRINT 
Bi OOSfh PRINT りす 2+ ォ さす 。。。。n = X ど 
9 OO6Sh INP . MSGODUTs 
10』 OO65h INPUT "3nPuUt n (n = 1。..25O) ーー>" 5 INPVAL 
11』 OOZeh 1F (INPVAL く 1 ) UR (INPVAL >25O) 学 
12』 OO97h THEN GOT0 INP . MSSDUT 
1 さ 』 OO マ ah 
14』 OO9ah 学 と OmDut@ 
15』 OOah BSUB CALC。 SUB 
16』 OOdh 
17』 OOdh Out と @ 呈 い 1 も 
1Bk OO9dh PRINT 
19』 OOaOoh PRINT "1+ す 2+ さ を す 。。。。" 5 INPVAL 5 "= "5 ANSX 
20』 OObemh 


21』 OObeh STOP 学 DFOdFram un en ロロ 
22』 OObeh 

2 さ 』 OOc1h 

24』 OOc1ih \ こ a1C ubFOut1ne 

25』 OOc1ih CALC. SUBs 

26』 OOc1ih P= TINPVQL+1 

27』  OQd さ h ANS X= P * O。5 * 1INFVAL 

28』 OOeBh RETURN 

29』 OOmch 


さ O』 OOech \ し 1 も end。 
nd Of Compi1lation 
nO と OF5 de@tected 


COd@GB arGa 51zGs 2 さ 6 OOech 
data arGa Sizes 24 OO18h 
COmmOn area swizea O OOOOh 


SymbOo1 tab1e space remainingi 1642 さ 


^A> コン バイ ル 成 功 . エラ ー な し . 


Figure-5.3.3 CB-80 に よる コン パイ ラ の 実行 . 


次 は コン パイ ル に より 生成 され た リロ ケー タブ ル ・ オ プ ジ ェ クト ・ フ ァイル “SAMPLE . REL” と 、 
ラン タイ ム ・ ラ イプ ラリ “CB-80 . IRL′ と の リン ク を 行い ます . 必要 な ら ば , 他 の 言語 や .、 アセ ンプ 
ラ か ら の リロ ケー タプ ル ・ オ プ ジ ェ クト と の リン ク も 自由 に 行う こと が で きま す . 


AA>DIR SAMPLE. き ) ーー コン バイ ル に より 生成 され だ ファ イル の 確認 . 


At SQMPLE BAS 』 SAMPLE REL 
ソー ス ・ フ ァイル リロ ケー ダブ ル ・ オ プ ジ エ ェクト ・ フ ァイル . 


A>LKBO_SAMPLE ) リン フク - ロ ー ダ の 実行 . YSAMPLE. REL" と "CB80.jRL” を リン する . 


フ コ フ 


台 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 倒 


LKBO _ VERSION 1. さ SERIQAL ND. O724567B COPYRIGHT ( ビ ) 
1982 DIGITQAL RESEARCH。 INC。 QALL RIGHTS RESERVED 


CODE SIZEs 16BO (OQ100-177F 〉 
COMMON SI1ZEI OOOO 
DATA SIZEs O1AC (17B0-192B) 


SYMBOL TABLE SPACE REMAININGs 7S5D9 


QA>DIR SQMPLE。* / - 生成 され だ ファ イル の 確認 . 


Rs SAMPLE BAS 』 SQAMPLE REL 』 SAMPLE SYM 』 SAMPLE CON 
シン ポル ロケ ーション ・ フ ァイル 実行 可能 な 純 マ シン ・ コ ー ド ・ フ ァイル . 


A>B STAT SAIIPLE.CON ) “SAMPLE.COM" の 容量 を 調べ る . 
RECS BYTES EXT ACC 

45 6K 1 R/M AiSAMPLE.CON -…-6K バ イト 長 で ある . 
BYTES REMAINING DN Qi 152K 


人 > 


意 


Figure-5.3.4 "SAMPLE” ファ イル の 確認 と 。 ラ ンタ イム ・ ラ イプ ブラリ と の リン ク . 


以上 の 手順 で , 実行 可能 な オプ ジェ クト ・ フ ァイル “SAMPLE . COM” が で き 上 り ま し た . 
ぐ で ほほ 。 どの プア 班 グラ ム を 素行 し て るみ まし まう 、 


A>SAMPLE / --- *SAMPLE* プ ログ ラム の 実行 . 


1+ フ 2+ ォ さす 。。。。n ロ デー 
input n (n = 1。...25O) ーー-> SOO7 ーー…-: 251 以 上 で 入力 エラ ー. 
input n (n = 1...25O) ーー> 25O/ -…- 会 回 は 正しい 入力 創 . 


1+2+ さ +。 。 。 。 250 = さ 137S 入力 値 と 答え が 表示 され て いる . 
仙 > 


KEN OZ 


Figure-5.3.5 BASIC コン パイ ラ CB-80 で 作成 され た "SAMPLE" プロ グラ ム の 実行. 


参考 まで に 。 リ ンク ・ ロ ー ダ の 実行 で 生成 され た シン ボル ・ ロ ケー ショ ン ・ フ ァイル を タイ プア ウ 
ト し て 示し ます . この “SYM” ファ イル は , デバ ッ ガ の SID や ZSID (3.1 章 参照 ) の シン ボル 入 


カ 用 ファ イル と し て 使用 で きま す . 
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A>TYPE SAMPLE.SYM ) シン ボル ・ ロ ケー ショ ン ・ フ ァイル の タイ プア ウト . 


16EB INP.NMS 1914 INPVAL 1744 CALC-. 191C ANSX 
1924 P 


仙 > 


Figure-5.3.6 リン ク ・ ロ ー ダ の 実行 に より 生成 され た シン ボル ・ ロ ケー ショ ン ・ フ ァイル を タイ プア 
亡 h。 


参考 まで に , PC-8801 上 の N-BASIC と PC-8801 上 の CPM で の CB-80 と を, 簡単 な アデ ログラム 
を 使っ て 処理 速度 の 比較 を 行っ て み ま し た . 

プロ グラ ム は , 変数 P を 1 か ら 100 ま で 変化 させ , その 2 乗 を 求め て 変数 X と し , それ を 何 回 か 繰り 
返し 。 P と 双 を 刻々 と スク リー ン に 表示 させ る , と いう 簡単 な も の で す . 

全く 同一 内 容 の この プロ グラ ム を N-BASIC と CB-80 と で , 実行 し た も の を 次 に 示し ます . 


1oad "bench"/ ーー-N-BASIC で の *bench* プ ロブ ラム を ロー ド . 
Ok 


1 gt) プロ グラ ム を リス ト ア ウト . 
10 DEFINT P。L。Y。X 

20 PRINT TIME*』PRINT 

さ O FOR P=1 TQ 10o CB-80 と 全く 同 -- の プロ グラ ム . 

4O FOR し =1 TO 100』Y=P/2: X=(Y+Y) *PsNEXT し ! だ だ し レイン タープ リマ で の 実行 スピ ー ド 向上 の 
SO PRTNT P』XjCHR$(&HD) 3 だ め に , マル チ ・ ス テー トメ ント な どの 配慮 が レ 
60 NEXT P 矯 帰 の み 行 っ . Eee 

70 PRINT』PRINT TIME$ 

0 END 

0k 

の UN っ ニニ ーー 実行 . (PC-8801 の N-BASIC に よる ) 

O0s 00s 22 プロ グラ ム の スタ ー ト 時 刻 . ] 


1OO 10OOO-- 災 くど 変化 する P と X の 科 . eo 
OOrO2s27 プロ グラ ム の 綴 了 時 刻 . 
ロ k 


Figure-5.3.7 PC-8801 の N-BASIC で の 実行 . 


A>TYPE BENCH.BAS / CB-80 で の "BENCH" プ ログ ラム の ソー ス ・ フ ァイル を タイ プア ウト 、. 


TNTEBER P』 し ,Y,X 


PRINT  。 CHR*$(1BH) 』 "AV NEC の CPZM で の 時 刻 表 示 の エス ケー プ ・ シ ー ケ ンス . 
PRINT 


P=O 』 し L=O 』 X=O 


2398 


洗 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


、 FOR P=1 TO 1oo 
FOR L=1 TO 1oo 
Y=P/2 
X=(Y+Y) *P \SAME AS (P^2) 
NEXT  L 
PRINT 。 P 』 X 』 CHR*(ODH) 』 
NEXT  P 復帰 の み 行う 
PRINT 
PRINT 
PRINT CHR$*(1BH) 』 "a" 前 出 . 
STOP 


Ne / 


Figure-5.3.8 CB-80 の ソー ス ・ フ ァイル . 


A>BENCH) OB-80 で コン バイ ル し ただ `BENCH? プ ログ ラム の 実行 . 


OOr tsS2 ーー プロ グラ ム の スタ ー ト 人 。 ] 
100 。 10oOO 次 く と 変化 する P と X の 値 。  ! 所 要 時 間 6 秒 

| (CN-BASiC の 約 21 倍 ) 
OO 11s3B ーー ブロ グラ ム の 終 ず 時 謙 . 


OOs 1 1a さ 8 CPM の リブ ー ト に よる 時 刻 表 示 . 
仙 > 


Figure-5.3.9 PC-8801+NEC CP〆M で の CB-80 の 実行. 


CB-80 の , その 他 の 多く の 機能 の 紹介 は 省略 し ます . 


5.4 PASCAL 


5.4.1 PASCAL に つい て 


PASCAL は , 1968~1970 年 に チュ ー リ ッ ヒ の Niklaus Wirth に よっ て スイ ス で 作ら れ ま し た . 
PASCAL と いう 名 は , フラ ンス の 数 学者 。 Blaise Pascal (1623ー1662) の 名 を と っ た も の で , 他 の 
多く の 言語 の よう に , 語 の 頭 文 字 を 綴っ た も の で は あり ませ ん , 

最初 の PASCAL コン パイ ラ は , 1970 年 に Control Data 社 の 大 型 マ シン 6600 シ ステ ム に お いて 実 
用 化 き れ て いま す . 

PASCAL は , 本 章 の 5.10 に 取り 上 げた ALGOL 60 が その 母体 で ある と 言わ れ , 文法 な ど よ く 仏 
て いま す (互い の ソー ス ・ プ ログ ラム を 比較 参照 し て みて 下さ い ). PL ノ 1 や COBOL の よう な 炉 雑 
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さ が な く , BASIC や FORTRAN の 欠点 で ある スト ラク チャ ー ド ・ プ ログ ラミ ング と いう 点 で の 不 
足 を 補っ た , 最も 学習 し や すく 使い や すい 言語 の 1 つ で す . 


5.4.2 Digital Research 社 Pascal プ MT 十 に つい て 


(Pascal プ MT 十 は , MT Microsystem 社 の 製品 で ある が , 同社 は 1981 年 秋 に , Digital Research 社 と 合併 し た ) 

Pascal プ MT 十 は 、 コ ン パ イラ や エディ タ な どの 言語 シス テム , それ に ビジ ネス パッ ケー ジ な どの 
デー タ 処 理 用 の アプ リケーション を 書い た り , 一 方 , 計測 シス テム や 通信 関係 の リア ル ・ タ イム 処理 
用 アプ リケーション を 書い た り , それ ら 双 方 の 目的 に 使用 で きる コン パイ ラ で す . 

Pascal プ MT 十 は , ISO 標準 (DPS/7185) の スー パー セッ ト (ISO 標準 を 満足 し て , さら に 拡張 
機能 が ある ) で あり , ROM 化 も 可能 な 純 マ シン ・ コ ー ド を 出力 し ます . よっ て , ユー ザー に と っ て 
は あま り 意 味 の な い P コ ー ド を 出力 する PASCAL コン パラ な ど よ り , 実 行 速度 が 5 10 倍 高速 に な り 
ます 。 

ISO 標準 の 拡張 と し て は , モジ ュ ラ ー・ コ ン パ イル , 255 文 字 ま で の 文字 列 操作 . アセ ンプ ブリ 言語 と 
の リン ク , アド レス お よび サイ ズ の 関数 , 割り 込み 処理 な ど が あり ます . 

また , 1 プ O ポー ト の コン トロ ー ル が 可能 で あり , か つ CPM の BDOS を 利用 し な い マ シン ・ コ 
ー ド を 生成 する こと が で き , ROM 化 が 可能 な の で , 制御 用 プロ グラ ム と し て 機器 に 組み 込む こと が 
で きま まず 。 

また , 開発 ツー ル と し て , コン パイ ラ , リン カ 。 シン ポリ ッ ク ・ デ バッ ガ , 逆 ア セン プラ が 含ま れ 
て お り , 開発 環境 が 非常 に 良い PASCAL シス テム で ある と 言え ます . 


5.4.3 Pascal プ MT 十 に よる 「SAMPLE」 プ ログ ラム の 作成 


まず , その ソー ス ・ プ ログ ラム を 次 に 示し ます . 


A>TYPE SAMPLE.SRC ファ イル 名 の エフ ステ ンション は 何で も よい が , “SRCY ガ デア フォー ルト 名 で ある . 


(* Pasca1/MT+ swample Program for "人 APP11cCation CP/M" 。 *) 


(*ー*・) あ る い は | 一 | の 間 が コメ ント と な る . 

PrOgram samD1es (* program namー *) 5 
var  n。 numb。 tempi 1n ロ teg ロ er (* variable declaration *) は 
1 
begin れ 
writelns (* print tit1e *) の 
write1n ("1+2+ さ + す 。。。。n = x”) ョ 3 
GDP@a キ e メ 
write@ ("input n (n = 1。.。.25O) ーー>” ) 3 (キキ Print prOmDpt messa ロ e *) 料 

read (n) (* 1nput n ロ #*) 
unti1 (n > O) and (n <= 25O0)』 (* range check #) 
write1lns N 
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numb ョ = ni temDp 』= ns (* ま COmDut@ SummmatiOn ) 
while numb > 1 do 
beqgin 
numb *#= numb 一 1* 
も emD *= temp + numb 
品 ロ 3 


wr1 モ @1n ("1 て 424 さて す 。。。。" 。 ロ 。 " = ”。 emp) ( ま DFr1n ロ も reSul1t *) 


end。 ーー“ を 活 れ な いよ うに . 


ご この プログ ラム は 小文字 で 書い て ある が , 大 文字 で 書い て も 構わ な い ( し ガ し 小文字 の 方 が 美しい ). 
人 > 


Figure-5.4.1 Pascal MT 十 で 書い た 「SAMPLE」 プ ログ ラム の ソー ス ・ フ ァイル . 


ソー ス ・ フ ァイル 名 の エク ステ ンション は 何で も 構い ませ ん が , SRC” が デフ ォ ー ル ト 名 と な っ て 
いる の で , SRC" と し て お け ば , コン パイ ル や リン ク な どの 実行 時 の コマ ンド ・ ラ イン で 省略 が で き 
て 便利 で す . 

次 に , Pascal プ MT 十 の パッ ケー ジ の 中 か ら , SAMPLE” プロ グラ ム を コン パイ ルー リン ク … 実 
行 す る の に 必要 な 最低 限 の 各 フ ァイル を , STAT コマ ンド で 示し て お きま す . 


A>BISTAT ま 。 キ / 


Recs Bytes Ext QAcc 
っ 78 さ 5k さ R/M asMTPLUS.CDM ーー コンパ イラ の ルー ト ・ ブ ログ ラム . 
1oO 1 さ に 1 R/M QiMTPLUS. OOO 
84 11k 1 R/M AMTPLUB.OO1 
に ご こ 】 フト 1 R/M nkMTPLUGS . OO2 、 軸 
59 Bk 1 R/M AsNTPLua。oos | リフ の オー バレ イ ・ 
1 さ 6 17k 2 R/M akMTPLUS.OO4 
61 Bk 1 R/M AiMTPLUS. OO5 
46 ek 1 R/W AsMTPLU5。 OO6 …ー デバッガ 用 の ルー チン の 1 つ . ご こ で は 特に 和 め 要 で は な い . 
9o 12k 1 R/W AmLINKMT。CON リン フ ・ ロ ー ダ .  . 
19o 24k 2 R/M AzPABLIB。ERL ラン タイ ム ・ ラ イブ ラリ . 
7 1k 1 R/W AiSAMPLE。 SRC SAMPLE』 の ソー ス ・ フ ァイル . 
145 19k 2 R/W AiDISBOBO。COM 李 ア セン ブラ . ここ で は 特に 和 め 要 で は な い . 


Bytes Remaining Un Qi Ok 


人 > 


Figure-5.4.2 Pascal プ MT 二 の コ ン パ イル , リン ク に 必要 な 最低 限 の 各 フ ァイル . 


で は , ソー ス ・ ファ イル YSAMPLE. SRC" の コン パイ ル か ら 始 め ま す . コン パイ ラ の 実行 と , 生 
成 さ れ た ファ イル の 確認 の 実行 例 を 次 に 示し ます . 
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A>DIR SANPLE。.W ) SAMPLE* フ ァイル の 確認 . 
fs BMPLE SRC 最初 は ソー ス ・ フ ァイル の み 存 在 . 


A>MTPLUS_SAMPLE $XPA 7 コン バイ ラ の 実行 . ス イッ チ *$SXPA* は , 逆 セ ン ブ プラ の だ め の 


オプ ジェ クト ・ コ ー ド と , リス ト ・ フ ァイル を 生成 する こと を 指示 し て いる . 
Pasca1 /MT+ Release 5.5 


(c) 1981 MT MicroSYSTEMS。 Inc. 


Di =as5semb 1 Fr し ほ ヒ ロレ d5 enab1 ed 
PRN fi1@ routed to disks 人 
CP/M-BO version 

キ 


Source 11ness 25 

Symbo1 Table Initialization 
available Memoryi 6109 
User Table Spacei 211 さ 
VS5.5 Phase 1 


Remaining Memoryi 2085 
VS5.5 Phase 2 


SAMPLE 

Lines 』 25 
Erroress O 
Code 。 * 2 コミ 
Data s に -】 


Pasca1 /MT+ 5.5 Compilation Comp1 et 


コン バイ ル 成 功 . エ ラー な し . 
A>DIR SAMPLE-.# / -- 生成 され た ファ イル の 委 認 . 


ソー ス ・ フ ァイル リス ト ・ フ ァイル リロ ケー タブ ル ・ オ ブ プ ジ エ クト ・ フ ァイル 


Ai SAMPLE SRC 』 SaMPLE PRN : SaMPLE ERL 
に 


Figure-5.4.3 Pascal プ MT 二 の コン パラ の 実行 と 生成 され た ファ イル の 確認 . 


コン パイ ル は 成功 し て , "SAMPLE . ERL′ (ERL=Extended ReLocatable object code) が 生成 
され て いま す . "ERL” ファ イル は , マイ クロ ソフ ト 社 の “REL” ファ イル の 上 位 コ ン パ チ ブ ル の リロ 
ケー タブ ル ・ オ プ ジ ェ クト ・ フ ァイル で , Pascal プ MT 十 で 使用 する 逆 ア モン プラ や デバ ッ ガ の た め 
の 情報 まで 含ん で いま す . 

次 の 作業 は , “SAMPLE. ERL′ と “PASLIB.ERL” を リン ク し て , 実行 可能 な オプ ジェ クト ・ フ 
ァイル を 生成 する た め に , リン ク ・ ロ ー ダ を 実行 し ます . その 実行 例 を 次 に 示し ます . 


指示 ,* ^W' は SID や ZSID の だ め の "SYM“ フ ァ イ ル を 生成 する 指示 . 
Link/MT+ Release 5.5 


Processing fi1e 一 SAMPLE  .ERL 
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台 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


Processin ロ fi1e 一 PASLIB  .ERL 

Undefined Symbo1ss 

No _ Undefined Symbol1s 

OOS1 (decima1 ) re@ と Ords written キモ oO .CDM fi1e 


Tota1 Dataik O3C9H bytes 
Tota1 Code』 19 さ AH bytes 
Remaining 』 SDBBH bytes 


Link/MT+ Release ら .5 PrOCGBsS1in こと OmD1eted 


リン 成功 、 
>DIR SAMPLE.*/ 生成 され ね だ ファ イル の 確認 . 


Rs SQAMPLE SRC 』 SAHPLE PRN : SQAMPLE ERL 』 SAMPLE  SYh 

As BAIIPLE CON SID・ZSID 用 の シン ポル ・ テ ー ブ ル ・ フ ァイル . 
実行 可能 な 純 マ シン ・ コ ー ド ファ イル . 

A>B』STAT SAMPLE.COM )  *SAMPLE.COM" の ファ イル 容量 を 調べ る . 

RecCs By キモ es= Ext cc 


51 プア k 1 R/M AsSAHPLE - CDN 7/ に バイト 長 で ある . 
Bytes= Remaining ロ n の Qi 67k 


We に 抽 め 


Figure-5.4.4 リン ク ・ ロ ー ダ の 実行 . 実行 可能 な オプ ジェ クト ・ フ ァイル を 生成 する . 


リン ク も 成功 し て , 純 マ シン ・ コ ー ド の “COM” ファ イル が 生成 され まし た . 同時 に , スイ ッ チ バン 
W に より , SID, ZSID (シセ シンボリック ・ イ ンス トラ クシ ョ ン ・ デ バッ ガ . 3.1 章 参照 ) に 入力 する シ 
ン ボ ル ・ テ チー ブル ・ フ ァイル も 生成 され て いま す . 


A>TYPE SAMPLE.SYN !/ シン ポル ・ テ ー ブ ル ・ フ ァイル を タイ プア ウト する . 


199E MOVERI 1981 MOVELE 19CO FILLCH 12 さ 9 TOURESU 
1981 MOVE 1247 RESULTI OC2B BET ODS4 PUT 
1ASB SYSNMENM O2BF INPUT OSB2 OUTPUT O21F N 

O21D NUMB O21B TENMP 


AA> 


Figure-5.4.5 生成 され た , SID, ZSID 用 の “SYM” ファ イル の タイ プア ウト . 


で は 。 で き 上 っ た サジ プル ・ プ ログ ラム を 実行 し て み ま し ょ う 、 
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A>SAMPLE ) SAMPLE? プ ログ ラム の 実行. 


1+2+ さ +。。。.n = x 

inPut n (n = 1。..-25O) ーー>4OO/ 251 以 上 の 入力 値 エ ラー. 
input n (n = 1...25O) ーー> 15O/ 今回 は 正しい 値 . 
1+2+ さ +。。。。15O = 11 さ 25 - 入力 値 と 答え が 出力 され て いる . 


> 


Figure-5.4.6 Pascal MT 十 で 作成 され た SAMPLE′” プロ グラ ム の 実行 . 


参考 まで に , Pascal プ MT 十 の 多く の 機能 の 内 の 1 つ で ある 逆 ア セン プラ” を 実行 し て み ま し ょ 
う 。 こ の ユー ティ リティ * プ ログ ラム は , ヨン パイ ル に より 生成 され た "ERL/ と "PRNP ブ ァ イル 
か ら , アセ ンプ ブリ 言語 の ソー ス ・ プ ログ ラム を 作成 し ます . 


ーー 入力 ファ イル 名 . 
ーー 出力 ファ イル 名 . 


M 
QA>DISBOBO_SAMPLE DISASM.LST / 
Pascai/MT+ 一 一 Disassemb1erーー 5.5 


CP /MーBO ver5s1iOn 


Ub ject code filek SnMPLE.ERL 
Listing fi1e 3 SnMPLE . PRN 
Dutput f11e s DISASM.LST 


End of proOgram 
AA> この 時 点 で , DISASM. LST” ガ 作成 され て いる . 


Figure-5.4.7 pascal プ MT の ユー ティ リティ ・ プ ログ ラム の 1 つ 逆 アセ ンプ ブラ? の 実行 . 


作成 され た アセ ンプ ブリ 言語 の ソー ス ・ プ ログ ラム “DISASM . LST” の 一 部 を 次 に タイ プア ウト し 
で 示し ます . 


Az>TYFE DISASM.LST) 


Pascal/MT+ Release 5.5 Copyright (c) 1981 by MT MicroSYSTEMS Page 人 1 
Di sassgemb1ly ofi SAMPLE 


Stmt Nest Bource Statement / Symboliic Objec も Code 


、 TEMP EQU OOoQo + 
NUMB EQU OoOQ2 
N EQU ooO4 
1 O (* Pascal/MT+ sample program for "AppP1icCation CF/M" 。 ま ) 
2 Oo 
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首 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


さ O 
4 O Proqgram samDp1ej ( ま prOgram name@ ま ) 
QQOOO DB 00。00。O0。0O。 00。 OO 。 OO。 0O 
00Q08 DE 00,00。00。00。00, 00, OO, 0O 
OO10 JMF OOQO 
に ) oO 
に -】 Q var 。 n。 numb。 temps integers 《(* vaFiable declaration *) 
4 1 
に 】 1 begin 
OO1 さ LHLD OOQO6 1 
0016 SPHL 
OO017 CALL OOQO 
O112 CALL OOFC* 
25 1 end 
O115 CALL OOA7* 
| O118 CALL Oo00O 
| 
External reference chain る MIN ーー-> 011 さ 
Externa1 reference chain QRIN ーー> 007 ド だ 
External1 reference chain @CRL ーー> O116 
Externa1 reference chain @BTI ーー> OOBE 
Externa1 reference と hain る @ し EI ーー> OO5S 
Externa1 reference chain る SFB ーー> OODE 
Ex モモ erna1 reference chain る QDMD ーー> O11O 
Externa1 reference chain る INI ーー> OO18 
Externa1 reference chain る MRS ーー-> O105 
Externa1 reference chain る HLT ーー> 0119 
External1 reference chain DUTFUT  --> OODA 
External1 rgference chain INPUT ーー> OO78 
AA> 
Figure-5.4.8 * 逆 アセ モン プラ で 作成 され た , ア セン プリ ・ ソ ー ス ・ プ ログ ラム の タイ プア ウト の 一 部 . 


Pascal プ MT 二 の , その 他 の 多く の 機能 の 紹介 は 省略 し ます . 


5.5 PL/I 


5 1 PL だ つい で 


PL プ I (Programming Language One) は , 1965 年 に IBM か ら , まず その 仕様 書 System 360 
Operating System PL バ I Language Specification が 一 般 に 公表 され まし た . 

1966 年 に は 、 その 仕様 に 基づき , 最初 の コン パイ ラ が イギリス の IBM Hursleay 研究 所 で 作ら れ , 
以後 何 度 か 機能 の 拡張 が 行わ れ 今日 に 至っ て いま す . 

PL/I は , それ が 計画 され た 当初 の 目的 通り ,COBOL の 持つ 事務 処理 能力 と FORTRAN や ALGOL 
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選 し メ 1 


の 持つ 数 学 的 な 処理 能力 を 合わ せ 持 ち ,。 か つ , アセ ンプ ラ ・ レ ベル の 処理 を も 可能 に し た , 非常 に 広 
い 分 野 に 適合 で きる プロ グラ ミン グ 言 語 で す . PL ノ 1 は , 構造 化 ア ログ ラミ ング 言語 で あり , その プ 
ログ ラム は , 読み 易く て 書き 易い と いう 特徴 が あり , 今日 の プロ グラ ミン グ 言 語 の 中 で も 重要 な 位置 
を 占め て いま す . 


5.5.2 Digital Research 社 PL プ 1-80 に つい て 


PL/I-80 は , CPM の 開発 者 で デジ タル リサ ー チ ナ 社 の 社長 で ある Dr. Gary Kildall 自ら が , 情熱 を 
持っ て 作り あげ た コン パイ ラ で す . 

PL は 非常 に 大 き な シ ステ ム で あり , ミニ コン ピュ ー タ に と っ て も 大 き 過 ぎ , その フル セッ ト は 
実現 が 困難 で す . よっ て , ANSI は , PL/I サブ プ セット G を 設定 し て お り , DEC, Data General, Wang 
な どの ミニ コン ピュ ー タ で は , この 仕様 に 準拠 し た PL ノ I を 提供 し て いま す . 当 PL ノ I-80 も 同じ 
く サ プ セ ッ ト G に 準拠 し て お り , これ は 他 の サ プ セ ッ ト G お よび フル セッ ト の TL ノ 】 に 対し て , アッ 
パー・ コ ン バ パチ ブル で す . 

PL プ 1-80 の 特徴 を 列記 する と, 


@ 事務 計算 の た め の 15 桁 10 進 計算 . 高速 な 科学 技術 計算 の た め の 固 定 お よび 浮動 2 進 デ ー タ 形式 , 
それ に 配列 と ポイ ンタ 変数 . 
@ 文字 列 と ビッ ト 列 操作 . 
@ シーケンシャル お よび ラン ダム ・ フ ァイル を サポ ー ト . 
@LINK に よる オー バレ イ . 
な ど が サポ ー ト され て お り ,。 コン パイ ル に より , マイ クロ ソフ ト ・ フ ォ ー マ ッ ト の リロ ケー タプ ブル ・ 
オプ ジェ クト ・ モ ジュ ー ル を 生成 し ます . よっ て , 他 の 言語 で 作ら れ た ライ プラ リ ・ モ ジュ ー ル と の 
結合 が 可能 で す . 
4.2 章 で 取り 上 げた 8080 一 8086 ト ラン スレ ー タ ^*XLT86′ は , この PL プ I-80 に よっ て 書か れ て いま す . 


5.5.3 PL ノン |-8O に よる 「SAMPLE」 プ ログ ラム の 作成 


まず , PL ノ I-80 に よる "SAMPLE′ プロ グラ ム の ソー ス ・ フ ァイル を 示し ます . ファ イル 名 の エ 
クス テン ショ ン は 。 必ず “PLIY で な けれ ば な り ま せん . 


4 フ 


省 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


PrOC OP モ ions(main)』 ーー プロ グラ ム の 開始 . 
dc1 


(n。numb) fixed decimal1(4) 。 4 拝 の 10 進 固定 小数 点 、 | 生 数 の 定義 
temp fixed decimal(6)3 ーー 6 桁 の 10 途 固定 小数 点 . 


/* it1e@ Out */ 


Put skip 11 上 ("1+2+ さ て 。。。。n = %7) ョ ーー 復帰 ・ 改 行 と タイ トル の 出力 . 
Put skip ョ 一 復帰 ・ 改 行 . 


ノ ま ロロ ume5a ロ @ 〇 ut and key inDut */ 
keyinps 
Put 1ist(”input n (n = 1。。。250) 一 ->?) ョ ーー 入 カ メッ セー ジ 出 力 . 
get 1ist (n)』ーー 数 値 の 入力 . 


1f (n< く 1) ! (n>25O) 


then qo to keyinpi 
1 名 


| 入力 針 の 症 . 
/ ま こと 〇 mDute * ネ / 
temp = Os [ 1 
do numb = 1 to ns | "まで の 電 和 の 和 


temn = temp + numbs 
end』 


/* anSw@r Out */ 
Put skip 11st(" 1+2+ さ す 。。。。 アロ 。 ーッ 。 モ emp ) 』 答え の 出力 . 
end samples 
仙 > 


Figure-5.5.1 PL/I-80 に よる "SAMPLE” プロ グラ ム の ソー ス ・ フ ァイル . 


次 に 、PL プ I-80 の パッ ケー ジ の 中 か ら , “SAMPLE” プロ グラ ム を 開発 する の に 最低 限 必要 な 各 フ 
ァイル を 示し て お きま す . 


>BsSTAT き 。*/ 


本 
3 
し コ 


Acc 

R/M AsPLI。COM PL ノコ ン バ イ ラ の ルー ト ・ プ ログ ラム . 
R/M AsPLIO. ロ vVL 

R/M AsPLI1。0VL [| コン バイ ラ の オー バレ イ . 

R/M 

R/M 


Recs Bytes 
60 Bk 
142 18k 
254 さ 2k 
247 さ 1k 
122 16k 
さ 47 44k R/M asPLILIB。IRL 

5 1k R/M QiSAMPLE.PL1I 
Bytew Remaining ロ n Ai 91k 


テロ ロビ D い DD ご 


谷 > 


Figure-5.5.2 PL プ 1-80 に よる SAMPLE” プロ グラ ム の 開発 に , 最低 限 必要 な 各 フ ァイル . 


で は , コン パイ ル の 作業 か ら 始 め ま す . コン パイ ラ の 実行 と 生成 され た ファ イル の 確認 の 実行 例 を 
次 に 示し ます 。 
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に し 


… 最 初 の "YSAMPLE" フ ァイル の 確認 . 
PL ーー ソー ス ・ フ ァイル の み 存 在 . 


A>DIR SAMPLE.* ナ 


Rs SAMPLE 


A>PL1 ら SAMPLE $D1/ コン バイ ラ の 実行 . ア セン プリ ・ ソ ー ス ・ コ ー ド に 展開 し だ "PRN” フ ァイル を 
ディ スク に セー ブ プ す る だ め の ス イツ チ ($DD) を 付け だ . 
NO_ ERROR(S) 1N PaSS 1 


NO ERROR(S) IN PASS 2 
コン バイ ル 成 功 . エ ラー な し . 


A>DIR SAMPLE 。 * ) 生成 され だ ファ イル の 確認 . 


RAz SQMPLE PLI 』 SAMPLE PRN 』 SAMPLE RE し 
ソー ス ・ フ ァイル 生成 され だ 生成 され だ 
A> リス ト ・ フ ァイル リロ ケー タブ ル ・ オ ブダ ェクト ・ フ ァイル 


Figure-5.5.3 PL プ I-80 に よる コン パイ ラ の 実行 と 生成 され た ファ イル の 確認 . 


コン パイ ル は 成功 し て , “REL” リロ ケー タプ ブル ・ オ プ ジ ェ クト ・ コ ー ド と , コン パイ ル 時 の コマ ンド ・ 
ライ ン に 付け た “"$DI′ スイ ッ チ に より , アセ ンプ リ 言 語 に 展開 され た "PRN′” ファ イル が 生成 され 
まし た 。 

決 は , リン ク ・ ロ ー ダ で , “SAMPLE . REL′ に , 各種 ラン タイ ム ・ ラ イブ ラリ (PLILIB . IRL) 
を リン ク し て , 実行 可能 な 1 本 の ファ イル に する 作業 で す . ここ で 使用 する リン ク ・ ロ ー ダ は , PL 
1-80 の パッ ケー ジ に 含ま れ て いる , デジ タル リサ ー チ 社 の リン ク ・ ロ ー ダ で す . その 実行 例 を 次 に 示し 
ます 。 


A>LINK_SAMPLE J リン フ ・ ロ ー ダ の 実行 . 
LINK 1. さ 


PLILIB RGQST SAMPLE O10O /BYSIN/ 1EE さ /SYSPRI/ 1FOB - シン ボル: テー ブル 
が 出力 され る . 


RBSOLUTE OO0QQ 

CODE SIZE 1DBA (O100-1EB9) 
DATA BIZE O222 (1FSE-21 7F ) 
CONMON SIZE OOD4 (1EBA-1FSD) 


USE FACTOR Eo 

リン フ 成 功 . 

A>DIR 丘 。 ま ) …… 生 成 さ れ だ ファ イル の 確 語 . 

Az SAMPLE PLI 』 SANPLE PRN : SAMPLE REL : 

仙 s 

生成 され だ 実行 可能 な 

生成 され を シン ボル ・ きれ だ 琵 な 
テー ブル ・ フ ァイル 貫 マシ ン ・ コ ー ド ・ フ ァイル 


フ 24 


洗 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


Recs Bytes Ext Acc 
65 9k 1 R/M ASAMPLE . COM 9K バ イト 長 で ある . 
Bytes Remaining ロ n ai 76k 


仙 > 


Figure-5.5.4 コン パイ ル に より 生成 され た “SAMPLE. REL' と ラン タイ ム ・ ラ イプ ラリ と の リン グ . 


最終 目的 で ある 実行 可能 な 1 本 の 純 マ シン ・ コ ー ド の オプ ジェ クト ・ フ ァイル が で き 上 り ま し た . 
同時 に , SID や ZSID (3.1 章 参照 ) に 入力 可能 な シン ボル ・ テ ー ブ プル ・ フ ァイル も 作ら れ て いま す . 
で は , で き 上 っ た “SAMPLE′” プロ グラ ム を 実行 し て み ま し ょ う . 


A>SAMFLE ) ^SAMPLE" プ ログ ラム の 実行. 


1+2+ さ +。。。-n = 


input n (n = 1。..25O0) ーー> さ OO 】 入力 値 の エラ ー. 
1nput n (n = 1。。。250) -->200/ 今回 は 正しい 値 を 入力 . 
1+2+ さ +。 。 。 200 = 2010O -…- 入 力 値 と 答え が 出力 され だ . 
End of ExeCution PL | の シス テム に よる 出力 . 

谷 > 


Figure-5.5.5 PL/I-80 で 作成 され た SAMPLE” プロ グラ ム の 実行 . 


次 に 参考 まで に , コン パイ ル 時 に 生成 され た リス ト ・ フ ァイル "SAMPLE . PRN” の 一 部 を 示し て 
お きま す . PL プ I の ソー ス ・ プ ログ ラム が , アセ ンプ ブリ 言語 に 展開 され て いま す . 


>TYPE SAMPLE . PRN 』 


PL/1-BO V1. さ CDMPILATIUN ロ F』 SAMPLE 


Di Disk Print | コン バイ ル 時 の D お よび ! スイ ッ チ の 機能 の 
ri Inter1ist SBourcew and Code | 悦男 文 ガ 出 力 さ れ て いる . 


NO ERROR(S) IN PASS 1 


NO ERROR(S) IN PASS 2 


PL/ エ ーBO V1. さ CONPILATIDN DFi SANMPLE 


1 OOQO /* PL/I-BO sample program for "Application じ P/M" 。 */ 
っ Oooo 
さ a OOOO samp1es 
oOOO LX1I  B。O2O0O 
OOO さ CaALL 2STaART 
4 a OOO6 PrOoc options(main)s 
5 c OOO6 dc1 
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PL/M 


ら 6 c OOO6 (n。numb) fixed decima1(4)。 
7 c OOO6 も temp fixed decimal1( ら 6) 
8 c OOQO6 
9 c OO006 /% 上 3 上 1 呈 Out ※*/ 
1O c 0006 Put skip 11 上 ("1+2+ さ キ 。。。。n ロ デニ X") ョ 
0Q006 LXI  D。,O252 
OOOg LXI  B。QOOQO 
QOOC CALL 2SYSPR 
9154 MVI QA。O9 
O156 MVI B,OO 
O15 晶 CALL ? ロ DCOP 
O1S5B CALL ?PNVOP 
O1SE CALL ?0IOOP 
O11A = ニニ = O161 
29 c O161 
さ O a O161 end samples 
0161 CALL ?BTOPX 


CODE SIZE = O164 
DATA AREA = OO4C 
FREE SYIS = O289 
END COMPILATION 


仙 > 


Figure-5.5.6 コン パイ ル 時 に 生成 され た リス ト ・ フ ァイル の 一 部 を タイ プア ウト . 


5.6 PL/M 


5.6.1 PL プ M に つい て 


PL プ M は , イン テル 社 が 1974 年 に 発表 し た , 8008 お よび 8080 用 の コン パイ ラ で あり , 特に マイ クロ 
コン ピュ ー タ の ソフ トウ ェ ア の 開発 に 適する よう に , シン プル に 作ら れ た プロ グラ ミン グ 言 語 で す . 

CPM の 開発 者 で , デジ タル リサ ー ナ 社 の 社長 で ある Dr. Gary Kildall も , 当時 イン テル 社 の コ 
ン サ ル タ ン ト として, PL/M の 開発 を 行い まし た . 

PLM は , 最初 は FORTRAN で 書か れ , その 後 ア セン ブラ で 書き 直さ きれ, さら に その 後 、 PL 
M 自身 に よっ て 書き 直さ れ て 現在 に 至っ て いま す . 

PL〆M は , PL に 似 た 構造 化 ア ログ ラミ ング 言語 で あり , マイ クロ プロ セッ サ の きめ 細か な 
ント ロー ル が アセ ンプ ブラ に 近い レベ ル で 可能 な マイ クロ コン ピュ ー タ ・ シ ステ ム に 密着 し た 高級 言 
で す . シス テム の 記述 が 可能 で , マイ クロ コン ピュ ー タ の 機能 を 十分 に 活用 で きる 高級 言語 は , こ 
PL プ M と FORTH だ け と も 言わ れ て いま す . また , CPM の いく つか の 部 分 は 、PL プ M に よっ 
て 書か て れ て いま す (version 2.0 に な っ て , アセ ンプ ラ で 書き 直さ れ た 部 分 も ある が ). 


づ 
計 五 
日 口 
の 
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5.6.2 Systems Consultants 社 PLMX に つい て 


PLMX は , イン テル 社 の PL プ M と コン パチ プル の プロ グラ ミン グ 言 語 で あり , PL プ M が イン テ 
ル 社 の ISIS- II オペ レー ティ ング ・ シ ステ ム 専 用 で ある の に 対し , PLMX は , CPM 上 の PL/M 
と 言っ て も 良い で し ょ うう . PLMX の マニ ュ ア ル は , 言語 マニ ュ ア ル が 付属 し て お ら ず , その ユー ザー 
ズ ・ ガ イド の 中 に は , 「PL プ M に 関し て は , イン テル 社 の 『PL/M-80 Programming Manual ( ド 
キュ メン ト No98-268B) を 参照 し て くれ 」 と 書か れ て いる の が お も し ろ い と ころ で す . 

PLMX コン パイ ラ は ,。 PL プ M の ソー ス ・ フ ァイル を コン パイ ル し て , アセ ンプ ブリ 言語 の ソー ス ・ 
ファ イル を 出力 し ます . よっ て , 当 コ ン パ イラ は , PL プ M ソー ス ・ フ ァイル か ら ア セン プリ 言語 の ソ 
ー ズ スズ ・ プ ァイル へ の “トラ ンス レー カク” と 直っ で も よい で し ょ う 。 出力 され た アセ ンプ アリ 衣 本 の ツー 
ス ・ フ ァイル の 形式 は 、 マイ クロ ソフ ト 社 の MACRO-80 (3. 3 章 参 照 ) に 準じ し て お り , も ちろ ん そ 
の まま で アセ ンプ ブル する こと が で きま す が , 必要 と あら ば , その ソー ス ・ フ ァイル を エディ タ を 使っ 
て , 自由 に 書き 替え て 使用 する こと も で きま す . 

PLMX は , CPM 上 で 実行 する プロ グラ ム を 開発 する 場合 に 便利 な よう に , CPM の シス テム ・ 
コー ルリ ジジ グル し た ディ スク ・ ア クセ ス を 念 お レル ⑩0 ユー ティ リ デ ィ *・ ジ イプ ラリ を 。 エ クス ター 
ナル (外部 ) ・ プ ロ シ ジ ャ と し て 用 意 し て いま す . 


5.6.3 PLMX に よる 「SAMPLE」 プ ログ ラム の 作成 
まず PL/M に よる ゾー ス ・ プ ログ ラム を 示し ます 。 


A>TYPE SANPLE. SRE ーー フ ア イ ル 名 の エフ ステ ンション は 何で も よい が , 
2 *SRC* ガ アデ フォー ルト 名 に 指定 され て いる . 


/* 。 PLMX (PL/M) sample program for "PP11Cation CP/M" ま /ーー ノン *ー* ネ ン の 間 が コメ ント と な る . 


多 &mD1 6 
dos 
decC1are bufptr 。 addre5 号 3 /* se モモ in _ buffer #※/ 
deC1arG = も atum addreSS5 
dec1are と oOunt addrG55 ま 
decC1are buf1ptr addressj 
dec1lare temp addr@S る 3 


declare numb addresgj 
declare mssg1(15) byte data ("1+2+ さ +。。、。。n = xX7)5 
dec1are mssg2(2B) byte data ("INPUT n (n = 1...25O) ーー>* ) 』 | 斑 種 デー ツ の 定義 . 


dec1are mssg さ (1O) byte data ("1+2+ さ +。。。 7) 
declare msms ロ 4 ( さ ) byte data ("=") ョ 
dec1lare Cr1f (2) byte data (Odh。Oah) 5 
declare buff1(1O) bytes 

decC1 ar Duff サ 2(2O) addres5# 


/* sy5=tem こ a11 prOCeGdur@  #/ 


つら 5 


PL ノ M 


as ] 
PrOC@ で du ロビ (fun とも On 。 Du 。 と 〇 い n ロ も.。 a と も い a1 。 もっ も いぶ ) Xn ロ a1』 
ロロ @C1a ビ (fun こ も 1On 。 わい uf 。 と 〇 いい ロモ 。 a と も いっ a]1 。 呈 モ ぁみ モ も い ほ ) a ロ ロレ 紀生 3 
end reads 行 入力 , 行 出力 の ライ ブ 
| ラリ を 使用 する 手 縮 き . 
wr1t@i 
procedure (function。 buffer 。 COunt 。 tatus) externals 
decC1are (function。 buf 和 fer。 COunt 。 5tatus) addresss 
end wr1 を も @ 
/ ま * 。 PL/N 11b ビ a レ ヒッ と a1 1 DFOCGdure キ / 
numins | 
PrOC@GdurG (buf す er) address  @x モ erna1s 人 
de と C1are Duff addres53 | W 
@nd numins 
nmOuts 
PrOCedure (Valu@。 Da5。 1 ヒ 。 buffadr 。 width) exteerna1#| 16bl( イ ナリ ーASCI 六 
declare (value。 buffadr) addresss | 変換 の ライ ブラ リ を 使用 す 
decC1ar@ (base。 1 と 。 width) bytes | る 続き . 
名 hd nmOut ョ s 
/ ま 。。 main と Out ュ in ロ @ ト す 4 
ca11 write (O。 .Cr1f。 2。 。status)#3  /# Print messaq@ #/ 
Ca11 write (O。 。mssg1。 15。 .status) ョ 
Ca11 write (0O。 .Cr1f。 2。  。status) ョ 
Ca1 1 write (0O。 .mss ロ 2。 2 フ 。 .status)* 
/* 。 read num わ er まき / 
と a11 read  ( 〇 O。 buf 和 1。 1O。 。.COunt 。 。 呈 も モ atus) 3 /* read  */ 
buf 1ptr = buf1 ョ 5 / ま 。 名品 モ わい すす e ロロ inter \ キ / 
num わ = numin (。buf1ptr) ョ / ま 。 COnVert ttO binary  #/ 
do while numb > 250 ョ s 
Ca1 1 write (O。 。mss ロ 2。 2 日 。 status) ョ 
ca11 read  (O。 -buff1。 10。 .Count。 。status)』 
buf 1ptr = 。buff15 
numb = numin (。buf1iptr) ョ メ 
end イ 
に メ 
ca1 1 write (O。 Cr1f。 2。 status) に 各 
ca11 write (O。 .cr1f。 2。 。swtatus) ョ /* 。 again / チ 
Ca11 write (O。 。mssg さ 。 10。 status) ョ / ま 。 Dr1nt ms5S ぁ @ #/ ツメ 
ca11 nmout (numb。 10。 。 " !。 。Buf す 2。 4)』 /* 。 binary 上 O aswcii #/ 
と て a1 1 write (0O。 。buff つ 。 4。 .status) ョ / ま 。。 write numbger きま / 
Ca1 1 write (O。 。mss ロ 4 。 さ 。 。status)』 / ま PFInt "ーッ ま / 
te@mp = numbs / ま 。 Ca11Cu1a も te@ */ 
do while numb >= 1 ョ 』 
numb = numb 一 1』 
temDp = temp + numbs / ま answer = 上 temp */ 
endl 
ca1 1 nmout (temp。10。" " 。。buff2(4) 。 フ )』  /* 。 binary 上 O awCii #/ 
Ca11 write ( 〇 O。 。buff2(4) 。 7。.statusm) ョ / ま 。 write On COnwOleg き / 
Ca11 write (O。 .Cr1f。 2。 .5tatusw) ョ / ま 。 と F1f at iniwh / 
end samD1es 


> 


Figure-5.6.1 


PL プ M に よる "SAMPLE” プロ グラ ム の ソー ス ・ フ ァイル . 
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ソー ス ・ フ ァイル 名 の エク ステ ンション は 何で も 構い ませ ん が , “SRC” が デフ ォ ー ル ト と し て 指定 
され て いま す の で , “SRC” と し て お く 方 が 何かと 便利 で す . 


次 に , PLMX の パッ ケー ジ の 中 か ら SAMPLE” プロ グラ ム を 作成 する た め に 必要 な 最低 限 の 各 
プ テ ァイル を 示し で て おき ます 、 


A>B: STAT きま 。 ま ) 


Recs Bytes Ext acc 

52 7k 1 RZW AiPLMX.COM ーー コン パイ ラ の ルー ト ・ プ ログ ラム . 
155 。 2ok 2 R/O AiCODA.PLM 

158 。。 2ok 2 R/ ロ AsFNLCG.PLM 

15B 2ok 2 RZO AsPaR5ER.PLH | 

X.PLIM | コン バイ ラ の オー 
3 る 2 1 RZD AU1ATaBLe.PFoR | "SAMPLE* プ ログ ラム で は 合 持 され な いも の も ある 〉 
BS 。。。 11k 1 R/O AiIETABLE.FOR | 
1 1k 1 R/0 ziIHTABLE.FDR 

B4 11k 1 R/M asLBO.COM リン ク ・ ロ ー ダ . れ * 

157 20k 2 R/M AsMBO.COM ーー マク ロ ・ ア セン プラ . 

5 さ 7k。 1 R/M AntOLIB。REL | ニニ ニ レニ 

29 4k 1 RZW AsRLTB。REL | ご 理 フ イブ ラリ ・ フ ァイル . 

22 Sk 1 RZW AzBAHPLE。5RC SAMPLEZ の ソー ス ・ フ ァイル . 


Bytes Remaining ロ n Qi 109k 


仙 >。 


Figure-5.6.2 PLMX に よる “SAMPLE” プロ グラ ム 開 発 に 必要 な 最低 限 の ファ イル . 


で は , コン パイ ル の 作業 か ら 始 め ま す . コン パイ ラ の 実行 と 生成 され た ファ イル の 確認 の 実行 例 を 
次 に 示し ます . 


A>DIR_ SANPLE.。* ) …- 最 初 の "SAMPLE" フ ァイル の 確認 
As BAMPLE BRC ……… ソ ー ス ・ フ ァイル の み 存 在 . 


RA>PLMX SAMPLE 』 M+ ビ +/ コン バイ ラ の 実行 . スイ ッ チ * M+ ヶ は 。 当 モジ ュー ル を メイ 
モジ ユー ル に 指定 する C+" は , コン パイ ル ・ リ スト を コン ソー ル に 出力 させ る 、 
PLIMX COMPILER VERSION 2.4 


COPYRIGBHT (C) 1980。 BYSTEMS CUNSULTANTS。 INC. 
TITLE SAMPL 
NAME ("SAMPL* ) 

SAMPL* ュ ハ リール に 還 
EXTRN INITS コン ソー ル に 出力 され だ コン バイ ル ・ リ スト . 


PUBLIC AAAABS 。 AAAAAS 


AAAAASs 
LXT H,$+ ら 6 
MP INIT9 
AAAAB3s 


『 
3/* 。 PLNX (PL/N) samp1le prOgram OF "APP11Ca も ion じ CPZ" */ 
日 


2 つら 5 人 4 


PL〆M 


TOO さ る ゅ 6 
DS Oo2H 
END AAAAAS る 


END ロ F COMPILATTION 
OQO_ERROR (8) DETECTED 


コン パイル 成功 . エラ ー な し . 
A>DIR SAMPLE.*) 生成 され だ ファ イル の 確認 . 


Ai SAMPLE SRC 』 SAMPLE MAC 
ブース ・ フ ァイル マイ クロ ソフ ト 社 の MACRO-80 形 式 の アセ ンプ リリ 言語 ソー ス ・ フ ァイル . 5 ピ 


オプ ジェ エフ ト ・ ファ イル で は な ぐ ,。 ソー ス ・ フ ァイル で ある こと に 注目 . 


Figure-5.6.3 PLMX に よる コン パイ ラ の 実行 と 生成 され た ファ イル の 確認 . 


ソー ス ・ フ ァイル “SAMPLE . SRC” の コン パイ ル は 成功 し て 。 ア セン プリ 言語 (マイ クロ ソフ ト 
社 の MACRO-80 形式 ) の ソー ス ・ フ ァイル が 生成 され まし た . この こと を 「 ア セン ブリ 言語 の ソー 
ス ・ フ ァイル に 展開 され た 」 と も 表現 し まず す . 

生成 され た アセ ンプ ブリ 言語 の ソー ス ・ フ ァイル SAMPLE . MAC” ("MAC′ は , MACRO-80 の 


ソー ス ・ フ ァイル に 付け る エク ステ ンション ) を 見 て み ま し ょ う . その 一 部 を 次 に 示し ます . 


es SAMPLE. MAC 】 展開 され だ ソー ス ・ フ ァイル を ダイ プア ウト . 


TITLE SAMPL 

NAME ("SAMPL* ) 
SAMPL』s 

EXTRN 1N1IT9 
PUBL1C AAAAB9。 AAAAAS 


AAAAAS ョ 
LX 1 日 。 ま + ら 
JMP INIT る 
AAAAB る * 


) 


日 
#/* PLMX (PL/M) sample program for "APP11iCation CP/M" 。 ま / 


| 各種 定 開 ・ 宣 言 ・ 手 続き の 部 分 . 
ここ ら 邊 の もの は コメ い 
は に な つて いる . 
1 ほほ ヒ 1ar@ (yalue。 Duffadr) addreS 生 # 
# deC1are (Da5@。 1C。 width) byt@5 
5 end nmouts 
H 


#/ ま 。 main し Outin@ ま / 


5 
すま Ca1 1 write@ ( 〇 O。 。 と Cr1 和 f す 。 2 つ 。  。.5 も a い 反 )#』  / キ DF1 ロ nt me5 弓 aa ロ G #/ 
BOO2 く 3* 


BOO20* メイ ン ル ー チ ン シ 部 
BOO19Qi + 
BOO1 さ 』 

LX1 B。OH 

PUSH B 


つら 5 らら 
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LXI B。AOOOF 
PUSH B 

LXI B。O2H 
PUSH B 

LX1I D。aOOO2 
POP B 

CALL MRITE 


日 
# ca11 write (O。 .mssg1。 15。 .status)』 
LX1 B。OH 


LXI D,AOOO2 
POP B 


CALL WRITE 


日 
日 Ca11 write (O。 。 て 上 1f す 。 2 つ 。  。= モ a モ us) ョ 
LX1I B。OH 


TOO2Ag 

DS 0O2H 
TOO2Bs 

DS Oi1H 
TOO さ さ * 

DS Oo2H 

END AAAAA る 


Figure-5.6.4 コン パイ ル に より 生成 きれ た アセ ンプ リ 言 語 の ソー ス ・ フ ァイル の タイ プア ウト . 


この ソー ス ・ フ ァイル は , この まま で アセ ンプ ブル する こと が で きる 状態 の も の で す が , 特に アセ ン 
プリ 言語 の レベ ル で 手 を 入れ た いこ と が あれ ば , エディ タ を 使っ て この ソー ス ・ フ ァイル を 自由 に 書 
き 替 える こと が で きま す . 

次 は , この ソー ス ・ フ ァイル の アセ ンプ ブル で す . この まま の ソー ス ・ フ ァイル “SAMPLE . MACY 
を MACRO-80 を 使っ て アセ ンプ ブル し , それ に よっ て 生成 され る ファ イル を 確認 する 例 を 示し ます ., 


A>MBO_SAMPLE 。 SANPLE=SAHPLE- 7 MACRO-80 に よる アセ ン ブ ル の 実行. 


No Fata1 error(s) 
アセ ン ブ ル 終 了 . エラ ー な し . 


QA>DIR SAMPLE。* リ 生成 され を ファ イル の 確認 . 


As SAMPLE SRC 』 SAMPLE MAC : SAMPLE PRN 』 SAMPLE REL 
PL M の ソー ス ・ フ ァイル . アセンブリ 言語 の 生成 き : 2 


れ だ ~ 生成 され だ 
A> ソー ス ・ フ ァイル リス ト ・ フ ァイル リロ ケー ダブ ル ・ オ ブ ジ ェクト ・ フ ァイル . 


Figure-5.6.5 コン パイ ル に より 生成 され た アセ ンプ リ ・ ソ ー ス ・ フ ァイル を , MACRO-80 に より ア 
セン ブル する 。. 
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アセ ンプ ル が 終了 し 。 リ ロケ ー タ ブル ・ オ プ ジ ェ クト ・ フ ァイル CREL” ファ イル ) と リス ト ・ フ 
ァイル ("PRN” ファ イル ) が 生成 され て いま す . 
注 ) MACRO-80 と , LINK-80 に つい て は , 3. 3 章 で 取り 上 げ て いま す の で 参照 し て 下さ い . 


いよ いよ 次 は 最終 え ステップ の リン ク 作 業 で す . 

PL プ M の ソー ス ・ プ ログ ラム の 前 半 部 に , 外部 ライ ブラリ ・ ル ー チ ン を 使用 する た め の 手 続き 文 が 
あり ます が , その ライ ブラ リ を 含む 2 つの オプ ジェ クト ・ フ ァイル ^RLIB . REL” と “]OLIB . REL* 
を , メイ ン ル ー チ ン の "SAMPLE . REL′ に リン ク し ます . 

その 実行 例 と 生成 され た ファ イル の 確認 を 次 に 示し ます . 


これ ら を リン ク し て , ^SAMPLE" と いう ファ イル 名 の "COM* フ ァイル を 作成 する . 
リ に CP/M に 戻る . 
メイ ン ・ モ ジュ ー ル ライ ブラ リ 1 ライ ブラ リ 2 ae ンー 
A>LBO BANPLE , RL TB。 TOLTB/。 SAMPLE /E /N 


LINK-BO さ .44  O9-DEC- 日 1 CUPYRIBHT ( ビ ) 1981 MICROSDFT 

々 MULT。 DEF 。 GLOBAL BP67 る この エラ ー・ メ ッ セ ー ジ は , BP67@ が , し で ED 
だ め の マ ル チ ・ デ ィ フ ァ イ ン ・ エ ラー. 無視 し て よい 

DATA O10 く OBS6 く 2643> 


EO146 OBS6 11 1 
リン ク 終 . 


A>DIR SAMPLE。 ま */ 生成 され だ ファ イル の 確認 . 


29 さ OB BYTES FREE ます 11 ペ ー ジ (256 バ イト x11) の 純 マ シン ・ コ ー ド が ガ で きだ . 


ni SAMNPLE SRC ik SAMPLE MAC 』 SAMPLE PRN 』 SAMPLE REL 
Ra SQMPLE CON 
実生 可能 な 範 マシ ツ . コ ー ド - フ ァイル 


QA>BaBTAT SAHPLE.COM ) SAMPLE. COM* の ファ イル 容 時 を 調べ る . 


RECS BYTES EXT ACC 
21 さ K 1 R/M SAMPLE. CDM 3K バ イト 長 で あ 
BYTES REMAININB DN ai 72K ( 林 章 の 言語 の 中 で は , By FORTHC 災 いで コッ パクト で ある ) 


仙 > 


Figure-5.6.6 アセ ンプ ブル に より 生成 され た メイ ン ・ モ ジュ ー ル と ライ ブラ リ ・ モ ジュ ー ル と の リン グ . 
最終 目的 で ある 実行 可能 な 純 マ シン ・ コ ー ド の ファ イル が で き 上 り ま し た . サイ ズ は 3 K バ イト で , 


他 の 言語 に 比べ る と か な り コ ン パ クト で あり , 本 章 の 中 で は , Rgy FORTH に 次 いで 小さ いも の で す . 
で は , で き 上 っ た SAMPLEY プロ グラ ム を 実行 し で み ま す 。 


つら フ 


習 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 例 


QA>SaANPLE ) ^SAMPLE? プ ログ ラム の 実行 . 


1+2+ う 3+。。。。n = 
INPUT n (n = 1。..250) 
INPUT n (n = 1..、250) 


1 + つ 2+ さ +。。。。 1OO = 


ー マ 〉260 だ マコ 251 以 上 の 入力 値 エ ラー. 
ーー が 再 屋 正しい 値 を 入力 . 


OSO 入力 還 と 呑 え が 出力 され て いる . 


Figure-5.6.7 


参考 まで に , MACRO-80 で の アセ ンプ ブル 時 に 生成 され た , 


PLMX (PL/M) で 作成 きれ た “SAMPLE” プロ グラ ム の 実行 例 . 


を タイ プア ウト し て , その 一 部 を 示し て お きま す . 


A>1YPE SAMPLE . PRN / 
SAMPL MACRO-BO さ .44 


"は 相対 アド レス を 表す . 


09-Dec- 日 1 


アセ ン ブ ル に より 生成 され だ “PRN”" フ ァイル の タイ プア ウト . 


PABE 1 


TITLE SAMPL 


ン NAME ("SAHPL* ) 
GOOO* SQMNPL ss 
EXTRN INIT る 
PUBLIC AAAABS る 。 
OOQoO* AAAAAS: 
QoOO* 21 QOOoe" bX 1 日 。 ま + ら 
0003* | 中 】 タン JNMP INIT る 
0006" RAAABS* 
~ * “は 外部 参照 を 表す . 1 
}/* 。 PLNMX (PL/N) wampleG program for "PP11cCation CP/M" 
ま 
ま / キ 。 main と Outine ま / 
H 
| ca11 write (O。 .Cr1f。 2。 .smtatus)』 
QO06* BOO2 く ョ 
1 GOO20I 
Q0006* BOO1 人 As 
OoOOe* GOO1 さ 』 
OOO6* Oi oooo LXI B。OH 
OOO9* lp に 】 PUSH B 
OOOA* O1 O1DS" LXT B。AOOOF 
QooD* CS PUSH B 
OoOOE * O1 OOO2 LXT B。O2H 
0011* CS PUSH B 
0012* 11 OO002" LXI D,AOOQO2 
0015? C1 POP B 
O016” CD OOOO* CALL WRITE 
H 
『 と て a1 1 wrtte (O。 msgg1。 15。 。statuw) ョ 
OO19* O1 oOQOO LXT B。OH 
仙 > ア 
Figure-5.6.8 M80 に よる アセ ンプ ブル で 生成 され た PRN ファ イル の タイ プア ウト . 


PLMX の , その 他 の 多く の 機能 の 紹介 は 省略 し ます . 
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リス ト ・ フ ァイル “SAMPLE 


. PRN” 


し 4 


/ き DFInt me@ る sadG #/ 


5.7 C 


5.7.1 CE つい で 


C は , 1971 年 に 稼動 を 始め た UNIX オペ レー ティ ング ・ シ ステ ム で 使用 する メイ ン の 言語 と し て 開 
発 さ れ ま し た . 

YUNIX′ と いう の は , ベル 研究 所 の Dennis Ritchie ら に よっ て 設計 され , 当初 は DEC の PDP- 
11 上 に イン プリ メン ト さ れ た だ た OS で あり , これ か ら の 16 ビ ッ ト , 32 ビ ッ ト コ ンピュータ の 共通 OS の 
1 つと し て , 注目 され 広まり つつ あり ます ( 注 : UNIX は , CP/M や MS-DOS の 延長 線 に 位置 す 
る も の で は な く , 明らか に 使用 環境 が 異な る も の で あり , 両者 を 比較 する の は 意味 が あり ませ ん ). 
*C? は , 1970 年 に K. Thompson に よっ て 開発 され た ~B" 言語 と 関係 が 深く , “C” と いう 名 も 
next B” と いう 意味 あい で 付け られ た と 言わ れ て いま す . 

UNIX は , 1971 年 当初 は アセ ンプ ブラ で 書か れ て いま し た が , 1973 年 に 全面 的 に 自分 自身 の “C” に 
よっ て 書き 直さ れ て いま す . 

C が 使わ れ た 身近 な 例 で は , 多く の パー ソナ ル ・ コ ンピュータ に 採用 され て いる お な じみ の マイ ク 
ロ ソ フト BASIC が , アセ ンプ ブラ 記 述 で あっ た も の を 現在 . C に よっ て 書き 直さ れ て いる と 聞い て い 
ます . また , 同社 の 世界 最高 レベ ル の 簡易 言語 ^Multiplan” は C で 書か れ て いま す . 

これ ら の 事実 か ら も 分 か る よう に , C は シス テム を 記述 し た り , 言語 を 記述 し た り , 事務 用 プロ グ 
ラム を 記述 し た りす る こと が で きる 言語 で あり , さら に , アセ ンプ ラ に 近い 記述 を する こと も 可能 で 
ある た め , 非常 に 幅広 い 分 野 で 利用 する こと が で きま す . 

C 言 語 の 特徴 の 1 つ に , ソー ス ・ プ ログ ラム を トッ プ ・ ダ ウン (上 か ら 順 に , メイ ン ル ー チ ン … サ 
プル ー チ ンー サブ ルー チン の サブ プル ー チ ンー その また サブ ルー チン つ …… と いう 具合 に 書き お ろ し て 
いく こと) で 記述 で きる こと も 挙げ られ ます . 


5.7 .2 BD Software 社 C Compiler に つい て 
現在 , 入手 が 可能 な C 言 語 は , Whitesmiths 社 の も の と , Super Soft 社 の も の と , それ に この BD 
Software 社 の も の が 一 般 的 で す が , 3 者 の 中 で は , この BDS 社 の も の が 何と 言っ て も 使い 易い の で 


取り 上 げ て み ま し た . 
BDS 社 の C じ コン パイ ラ を 構成 し て いる 主要 な モジ ュー ル は , 


CC1 . COM …… フェ ー ズ 1 の 段階 の コン パイ ラ . シン ボル ・ テ ー ブ ル と エン コー ド さ れ た ソ 
ー ス ・ コ ー ド を 生成 し . メモ リ 上 ある い は ディ スク 上 に 置く , コン パイ ル ・ 
エラ ー が な けれ ば 自動 的 に CC2 に 進む . 
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CC2 . COM …… フェ ュー ズ だ ク の コン パイ ラ 、G で CI で 生成 され な た CCIY アテ イル を 入力 し る て, 
^CRL” (C ReLocatable) ファ イル を 生成 ,. リ ロケ ー タ ブル の オプ ジェ クト ・ 
ファ イル が で き 上 る 、. 

CLINK COM CRL" ラテ ァイル と C。 CCC (コモ ン ・ シ ネス テム ・ サ デア ルー チン) ラフ ァイル を 
リン ク し , 実行 可能 な “COM”" ファ イル を 生成 する . 

CLIB COM CC2 で 生成 され た “CRL” ファ イル に 対し て , それ に 含ま れる 各種 ファ ンク 
ショ ン を “CRL" フ ァイル 間 相 互 で 移動 な どの 操作 を 行う ライ プラ リア ン ( 後 
述 ). 

OCG mm ラン タイ ム の 基本 ファ イル . コマ ンド ・ ラ イン 処理 , ファ イル 入出 力 バッ フ 
ァ や, 多く の サブ ルー チン な ど で 構 成 さ れ て いる . CC2 で 生成 され た "CRL” 
ファ イル と リン ク さ れ , 独立 し て 実行 可能 な “COM” ファ イル に 組み 込ま れ 
る 。 

DEFF . CRL…… 標 準 的 な 各種 ラブ ラリ. CLINK に よっ て , メイ ン “CRL” ファ イル に 組 
み 込 まれ る . 


以上 の 4 つの “COM” ファ イル と ,。 標準 ライ プラ リ そ れ に ラン ・ タ イム ・ モ ジュ ー ル が あり , その 
他 に は 。 標準 ライ プラ リ な どの ソー ス ・ フ ァイル , 各種 ユー ティ リティ や ゲー ム な どの ソー ス ・ フ ァ 
イル が 含ま れ て いま す . 

BDS の C じ コンパ イラ の 出力 は , Super Soft 社 の じ と コン パイ ラ の よう に , アセ ンプ リ 言 語 の ソー ス ・ 
コー ド で は な い の で , コン パイ ル 後 , 生成 され た アセ ンプ ブリ 言語 の ソー ス ・ コ ー ド に 手 を 入れ て , 細 
か な 操作 を する と いう 訳 に は 行き ませ ん . 

し か し , その 反面 , 大 変 使い 易く , C 言 語 を 学び な が ら 実 務 に も 応用 し よう と する 人 に は 最適 で は 
な いか と 思い ます . 

この C 言 語 は , UNIX 上 の C を 基 に , 重要 で な い 機 能 を 省き , マイ クロ コン ピュ ー タ 上 の C と し て 
構成 され た , UNIX C の サブ プ セ モット ・ レ ベル の も の で す . 


5.7 .3 BDS C に よる 「SAMPLE」 プ ログ ラム の 作成 


まず , C に よる “SAMPLE” プロ グラ ム の ソー ス ・ フ ァイル を 示し ます . ファ イル 名 の エク ステ ン 
ショ ン は , 必ず “CC” で な けれ ば な り ま せん . 


A>TYPE BAMNPLE。C 言語 の ソー ス ・ プ ログ ラム を タイ ブ ア ウ ト . エフ ステ ンション は 秘 ず "で "と する . 


/*  BD Software C Compiler sample program for "AppP1icCation CP/N" 。 ま / 
ン * ネ ンー ネン の 間 が コメ ント と な る . 
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main() /* main COutin */ 
t 


nt 1。num。 モ emps 


PT1nt イ (" 学 ロ 1+2+ さ キ 。。。。n ニー x" う ョ /* Print ms ノー パ \/ 記 号 は 本 来 は バッ フス ラッ シュ * ヽ "で あ 
Printf (" 学 ninput n (n = 1...25O) ーー->")』 る . 日 本 の プリ ンタ で は "\" に な つて し まう . 
* \n は 改行 を 表す . 
num = getnumber() ョ /* ロモ number き / 


while (num > 250)  ( -…- 複 数 の 文 を | | で 囲 お むこ 1 つの ブロ ッ フ に する こと が で きる . 
Printf("input n (n = 1...250) ーー | 
num = ロ getnumber()』 ) 


PF Ent (" 学 n1+ キ フ + さ + す 。。。。") / ま Print msg トイ 4 


Printf ("% さ d"。num) /*# Print number #/ 
PFIntf ("の = ツリ ) ョ 


t@mDp=nums / き Ca11Cu1 at \/ 
while (--num) て 


temp = temp+numi  } 


PF1n キ tf ("ん 6d"。 モ temp) ョ / ま ロレ 1 ロ 七 an 多い 昌 [ ネ / 
Print (" 学 n") ョ / ま Cr On CFGn キノ / 
} 
getnumber () /* get number subroutine \/-- ご の よう に サブ プル ー チ ン を , 
て それ が 使わ れ だ 後 で 定義 する 
ュ n ロ も Pnmb ョ ご と が で きる . 
char numb。s[5] ョ 
P = 0 
while (numb !=*\n7) て /* 1Oookin "と F" #/ 
numb = qetchar() ョ * 
5s[p] = numb ョ s / ま # 5ave in buffer #\/ 
++ ロ 5 } /# 1nCFement Duff poOinter */ 
P = Os /* と On ロマ er 上 to inteqger number #*/ 
nmb = Os 
while (sEP] !=*\n* && smEP] >="O" 1! ssEP] <= 97 ) て 
nmb = 1O * nmb + sgEp] 一 "OO"』 
++ ロ 8 }) 
return (nmb) ョ 』 /* return with inteqer number */ 
5 
> 
Figure-5.7.1 C に よる “SAMPLE” プロ グラ ム の ソー ス ・ フ ァイル . 


次 に , BDS の C コ ン パ イラ の パッ ケー ジ の 中 か ら ,。 “SAMPLE” プ ログ ラム を 作成 する の に 必要 な 
最低 限 の 各 フ ァイル を 示し ます . 
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A>BaSTAT W。 ま / 


Recs Bytes Ext acCcC 


86 11k 1 R/0 AiCC1 。CDM フエ ー ズ 1 の コン パイ ラ . 

70 9k 1 R/ ロ AaCC2.COM フェ エー ズ 2 の コン バイ ラ . 

26 4k 1 R/M AiCLINK.COM リン フロ ー ダ . 

14 2k 1 R/M iC.CECC ーー 基本 ラン タイ ム ・ モ ジ ユ ー ル . 

ファ 10k 1 R/M AaDEFF.CRL 標準 ライ ブラ リ . 

1O 2k 1 R/M ABANPLE.C SAMPLE* の ソー ス ・ ブ ログラム . 


Bytes Remaining ロ n ns 20 さ k 


> 


Figure-5.7.2 BDS の C に よる “SAMPLE” プロ グラ ム の 開発 に 必要 な 最低 限 の 各 フ ァイル . 


で は , コン パイ ル の 作業 か ら 始 め ま す . 

BDS の C は , 実行 可能 な 純 マ シン ・ コ ー ド ・ フ ァイル を 作成 する まで の 手順 が 非常 に シン プル で あ 
る の が 特徴 の 1 つ で す . 

コン パイ ラグ の 実行 と , 生成 され た ファ イル の 確認 例 を 次 に 示し ます . 


A>DIR SAMPLE. ま リー 最初 の *SAMPLE* フ ァイル の 確認 . 


Ai BAMPLE 。C ソース: ファ イル の み 存 在 . 


nA>CC1 SAMPLE.C / フェ ー ズ 1 の コン パイ ラ の 実行 . 


BD Software ビ Compiler v1.4 さ a (part Ii) 
フェ ー ズ 1 の コン バイ ル 完 了 。 


UM 
BD Software C Compil1er v1.4 さ (part Ii) 自動 的 に フェ ー ズ 2 の コン バイ ラ (CGC2.COM) 
20K to spare が 起動 し , 実行 され る . 


コン パイ ル 成 功 。 エ ラー な し . 
A>DIR SAMPLE.* / 生成 され ね だ ファ イル の 確認 . 


に s BANPLE CRL 


Ai SAMPLE 
ニル 生成 あれ な リロ ケー ダブル: オプ ジェ フト: ファイル. 


人 > 


Figure-5.7.3 BDS の C に よる コン パイ ラ の 実行 と 生成 され た ファ イル の 確認 . 


^*CC1 . COM”" に よる フェ ー ズ 1 の コン パイ ル が 終了 し た 時 点 で , 自動 的 に “CC2 . COM” に よる フ 
ェ ー ズ 2 の コン パイ ラ が 起動 きれ 実行 され まし た (スイ ッ チ に より , 別 々 に 実行 する こと も 可能 で す )、. 
これ に より , リロ ケー タプ ブル の オプ ジェ クト ・ フ ァイル “SAMPLE . CRL” が 生成 され て いま す . 

次 ほり リ シ ク ・ ロ ー ダ の 実行 で す . SAMPLE、 CRL" に 、 "C.CCC と "DEEE 、CRL7 を リン シク 
し ます . その 実行 例 を 次 に 示し ます . 
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FORTH 


人 >CLINK SAMPLE ) リン グ ・ ロ ー ダ の 実行 . "SAMPLE" に , C.CCC* と DEFF.CRL* を リン する . 


BD Software ビビ Linker v1.4 さ 
Linkaqe Comp1ete 
さ 2K 1 ft Over 


リン グ 完 了 . 


A>DIR SAMPLE。W ) 生成 され だ ファ イル を 確認 する . 


Rs SAMPLE 1m s SAMPLE CRL s SAMFLE CON 
生成 され だ 実行 可能 な 
純 マ シン ・ コ ー ド ・ フ ァイル 
RA>BsSTQAT SAMPLE .CDN ) *SAMPLE. COM* の ファ イル 容量 を 調べ る . 


Recs Bytes Ext acc 
29 4k 1 R/M nkSAMPLE . CD 4K バ イト 長 で ある . 
By モ @ 呈 Remaining Dn A』 さ Ok 


人 > 


Figure-5.7.4 リン ク ・ ロ ー ダ の 実行 。 "SAMPLE . CRL”" に 。 ラ イプ ラリ を リン ク す る 。 


以上 の 作業 で , BDS の C に よる 実行 可能 な 純 マ シン ・ コ ー ド の ファ イル が で き 上 り ま し た . で は そ 
の SAMPLE” プログ ラム を 実行 し て み ま し ょ う . 


2 ^SAMPLE" プ ログ ラム の 実行. 


1+2+ さ +。。。。n = ※ 
input n (n = 1。。.25O)  --> さ 5O J 251 以 上 な の て 入力 値 エ ラー. 
input n (n = 1。。.25O)  -->200 』) ーー 今回 は 正しい 値 を 入力 . 


1+24 さ +。。 。 200 = 201OO -… 入力 値 と 知 え が 出力 され て いる . 


ペニー 


人 > 


Figure-5.7.5 BDS の C に より 作成 され た "SAMPLE" プロ グラ ム の 実行 . 


BDS の C の , その 他 の 多く の 機能 の 紹介 は 省略 し ます . 
5.8 FORTH 


9.8.1 FORTH に つい て 


FORTH は , 1969 年 に , 米国 バー ジニ ア 州 の 国立 電波 天文 台 で , 観測 装置 の 自動 化 を 行う た め の 適 
当 な プロ グラ ミン グ 言 語 が な か っ た た め , Charles H. Moore に よっ て 新た に 開発 され た 言語 で 
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Moore は その 後 ,FORTH 社 を 設立 し ,。 ミ ニコ ンピュータ や マイ クロ コン ピュ ー タ 用 の Poly FORTH 
な どの 製品 を 発表 し て いま す . 

FORTH は , 本 章 で 取り 上 げた 他 の コン パイ ラ 言 語 と は , 文法 や オプ ジェ クト 構造 が 大 きく 異なり, 

^ALGOL の 流れ を くむ “と か , “PL/I と PASCAL の 中 間 的 な も の ” と 言っ た よう な 表現 が で き 
る 種類 の も の で は あり ませ ん . 

FORTH は ,、 スタ ッ ク 言 語 と 言っ て も よく , すべ て の 数 値 処 理 は スタ ッ ク に 積む こと に より 行わ れ 
ます (スタ ッ ク と は 。 ア セン プリ 言語 の “PUSH"。 “POP* と 同じ 原理 で す )、 ま た ,。 スタ ッ ク 言 語 で 
ある た め 、 その 文法 は 必然 的 に 逆 ポ ボーラ ンド 記法 と な っ て いま す ("2 十 3” を 逆 ポ ー ラ ンド 記法 で は 

- 導 3 二 と だ な まる)。 

FORTH の 記述 法 は , 構造 化 ア ログ ラミ ング の 最たる も の で あり , すべ て が モジ ュー ル 定 義 の 形 を 
と り , メイ ン ル ー チ ン , サブ ルー チン , 関数 , 演算 子 と いっ た 区 別 は あり ませ ん . 

FORTH は , シス テム が 記述 が で き , か つ ア セン プラ に 近い 記述 が 可能 で , 制御 用 プロ グラ ミン グ 
に も 適し た 非常 に オプ ジェ クト 効率 の よい コン パイ ラ と し て 注目 され て いま す . 


5.8.2 Rgy FORTH に つい て 


Rgy FORTH は 。 Z80 バ パー ジョン を 「FZ80」, 8080 バ パー ジョン を 「E80」 と 呼ん で いま す が , ここ 
で は Z80 バ ーション の FZ80 を 使用 し ます . 

Rgy FORTH は , 純 国産 の FORTH 言語 で あり , 現在 入手 可能 な 他 の FORTH に は な い , い くつ 
か の 特徴 を 持っ て いま す . 


@FORTH 言語 と 言う より , FORTH 言語 も 記述 で きる アセ ンプ ラ と 言っ て も よく , FORTH 言 
語 を 使わ な けれ ば , 全く の アセ ンプ ラ と し て 動作 する . 

@ 現 時 点 で は , お そら く 最 速 の FORTH で ある . 

@ ア ドレ スプ オプ ジェ クト を 含ん だ 完全 な コン パイ ル ・ リ スト を 出力 する . 

@FORTH ワー ド 中 か ら の アセ ンプ ブラ ・ プ ログ ラム の 呼び 出し , また は その 逆 の 呼び 出し を 任意 の 
タイ ミン グ で 何 回 で も 行う こと が 可能 . 

@ 割 り 込み 処理 を FORTH レベ ル で 記述 で きる . 

@CP/M の DDT と コマ ンド ・ コ ン パ チ で , コン パイ ル 後 の オプ ジェ クト を , シン ボリ ッ ク に 対 
話 形 式 で デバ ッ グ で きる デバ ッ ガ , “EFDT” が 付属 し て いる . 


な どこ の Rgy FORTH の 開発 者 が 従来 の FORTH に 満足 サ せ ず 。 さら に マイ クロ ・ プ ロ セ ッ サ に 密 
着 し た , アセ ンプ ラ に 替り 得る 高級 言語 を ター ゲッ ト と し て いる こと が よく 表れ て いま す . 

PL/M の 項 で も 述べ まし た が , マイ クロ プロ セッ サ に 密着 し た プロ グラ ミン グ 言 語 で , オブ ジェ ク 
ト の 小さ いこ と や 複雑 な 割り 込み 処理 その 他 で , 現時 点 で PL プ M に 対抗 で きる の は , この Rgy FORTH 
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が その 筆頭 と 言え る で し ょ う . 


5.8.3 Rgy FORTH に よる 「SAMPLE」 プ ログ ラム の 作成 


まず , Rgy FORTH に よる “SAMPLE′ プロ グラ ム の ソー ス ・ フ ァイル を 示し ます . ファ イル 名 
の エク ステ ンション は , 必ず “F80′ で な けれ ば な り ま せん . 


A>TYPE BAMPLE.FBO ファ イル 名 の エフ ステ ンション は , ゆず ^F80" と する . 


\ Rgy FORTH sample progrem for "application CP/N" ま ー 1 か 
ww ヽ に bb に が 
がら ラ イン の 終わ り ま で は コメ ント と な る で は *\* と な っ て し まう . 
TITLE * SAPLE PROGRAN* 
READLIB カー ネル ( 核 ) と リン する 擬似 命令 . 


DUP 2FH > SMAP 3 さ AH < FAND 』 入力 コー ドガ 0 一 9 で ある か を チェ エック す る ワー ドド. 
\ENTRY TOP』ABCII NIBL 


学 選 XIT TOP』 1 /O(1=0K) 
\2ND』 BINARY DATA 


DUP ?Oー 1 桁 10 進 ASCII> バ イナ リ 変 換 の ワー ド . 
1 っ 人 ) 
ELSE DROP, OO 
THEN 
CONBUFF DS 4 + 2 
』 ISTRING >NUMBER \EX1T TOP』 1/O 
\2ND: BINQRY DAQTA 
(CONBUFF + 2) >R 
Oo 
BEGIN 
1 B2 ASCII-BIN 
IF SMAP 1O * + 
R> 1+ >R ASCI 文 字 列 を 10 進 文字 と し て , 
REFEAT これ を バイ ナリ 値 に 変換 する ワー ド 。 


R> BS⑳ 0O= 文字 列 の 最後 が CR で ある か ガ の チエ ッ ク フ . 
IF 2DUP O > SMAP 251 < FAND 
1 | 


1ー250 の 範囲 
THEN | か を チエ ッ ク フク. 


MSG_INPUT* 
DB *input n (n = 1。.。..25O) ーー>%0O* 


日 [TNPUT_NUMBER ] \\EXIT TOP』 1 /O 


学 2ND』 BINARY DATA 
BEGIN ? 


PRCRLF 。 MSG_INPUT PRB CR/LF と メ ツ セー ジ の 出力 . 
4 CONBUFF RD_CONBUFF コン ソー ル か ガ ら 1 手 入 力 本 
TF STRINB>NUMBER 5 
ELSE o 
THEN 
UNTIL 』 
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s \ENTRY TUPIBIN DATA 


学 PRINT DECIMAL NUMBER MITH NH SPACE \ 
BIN-DEC 


DECBUFF 削 置 の 0, 前 置 の スペ ー ス を 抑止 し だ 
BESIN 10 進 プ リン ト ア ウト の ワー ド . 
DUP BQ 20H = 


3 - 計 
REPEAT 
PRS 


H [CALCULATE 1+2+ さ +。 。。.n \ENTRY TOP』NUMBER 


学 EEXIT TOPiSUM OF 1 一 N 


O 

SMQAP Oo DO 
6 も に 2 

LOOP 


n ま で の 総和 の 計算 の ワー ド . 


MSG" 1 +2+ さ +。。。。 DB "1+2+ さ +。 。 。 00* 
MSG"n_=_x"s DB "n = xZOO* 


PRCERLF PRCRLF 復帰 ・ 改 行 を 2 回. ) 
MSG" 1+2+ さ +。 。 。." PRS 。 MSG"n_=_x" PRS | 
INPUT_NUMBER PRCRLF PRCRLF 
MSG" 1 +2+ さ +。 。 "PRS 

DUP PRD+ =" CD PRBSPACE 
CALCULATE_ 1+2+ さ +。 。 、。n PRD+ PRCRLF 』 


メイ ン ワ ー ド (メイ ン ル ー チ ン に 当る も の ). 
今 ま で に 定義 きれ て いる FORTH ワ ー ド を 並 
べ だ も の . 


6 1 
LD IY。1OOH - 4OH Ne | 当 プ ログ プラ ム の スタ ー ト ・ ル ー チ ン を 
CALL EXFORTH \EXECUTE FORTH MORD | アビ ピン ブラ で 書い だ . 

JP o \CP/M REBODT 


SAVEL 1B 
END 


K 注 :」 認 が それ ぞ れ の FORTH ワ ー ド で あり , 最 下位 ワー ドガ ら 順に 定義 し て 行き ます . 


Figure-5.8.1 Rgy FORTH に よる "SAMPLE" プロ グラ ム の ソー ス ・ フ ァイル . 


この よう に FORTH の 文法 は 、COBOL や PL プ I な ど と は 全く 雰囲気 が 異な っ て いま す . 

Rgy FORTH の パッ ケー ジ の 中 か ら , "SAMPLE′ プロ グラ ム を 開発 する の に 必要 な 最低 限 の 各 フ 
ァイル を 次 に 示し て お きま す . 

この 中 の “CPMCON . HEX” は , あら か じ め そ の ソー ス ・ フ ァイル “CPMCON . F80” か ら 作 成 
し て お きま す . 
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Figure-5:8.2 Rgy FORTH に よる "SAMPLE′” プロ グラ ム の 開発 に 必要 な 最低 限 の 各 フ ァイル . 


さて コン パイ ル の 作業 を 始め ます が , Rgy FORTH は コン パイ ル 時 に 各種 ライ ブラ リ も 同時 に リン 
ク で きる の で , この 場合 は CPM の コン ソー ル 入 出力 ライ ブラ リ “CPMCON . HEX"” を コン パイ 
ル 時 に リン ク し ます . 


また , ソー ス ・ プ ログ ラム の 最 下部 で 当 プ ログ ラム の 起動 ルー チン が 定義 され て お り (プロ グラ 
ム の 起動 ルー チン まで 定義 で きる こと は , 他 の コン パイ ラ に は な い 特 徴 の 1 つ )、 コ ン パ イラ の 出力 は 、 
すでに 絶対 アド レス を 持っ た オプ ジェ クト ・ コ ー ド と な っ て いま す . 

コン パイ ラ の 実行 例 を 決 に 示し ます . 


ドド" 


Figure-5.8.3 Rgy FORTH の コン パイ ラ の 実行 と 生成 され た ファ イル の 確認 . 


コン パイ ル は 成功 し て , HEX 形式 の オプ ジェ クト ・ フ ァイル が 生成 され て いま す . この ファ イル は 
CP/M の DDT や Rgy FORTH の FDT な ど で , メモ リ 上 に 実行 可能 な 純 マ シン ・ コ ー ド と し て ロ 
ー ド で き , また , CP/M の LOAD コマ ンド で 実行 可能 な "COM” ファ イル に 変換 し て 、 デ ィ ス ク 
っ 下 一 ア ずる と と で きま ず 。 
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次 に 、CP〆M の LOAD コマ ンド の 実行 と 生成 され た ファ イル の 確認 例 を 示し ます . 


A>BsLOAD SAMPLE) CPM の LOAD コ マン ド 実 行 . “SAMPLE. HEX" ガ ら "SAMPLE.COM “を 生成 する . 


FIRST ADDRESS O1Oo 
LAST ADDRESS O7AZ 
BYTES READ O69a 
RECURDS MRITTEN OE 


LOAD コ マン ド 終 了 . 
QA>DIR SAMPLE.*/ 生成 され だ ファ イル の 人 確認. 


FBO 』 SAMPLE HEX 』: SAMPLE PRN 』 SAMPLE ERR 
CON 


実行 可能 な 純 マ シン ・ コ ー ド の ファ イル が 生成 され だ 。 


A>BsSTAT SAHMPLE。COHR ) SAMPLE. COM” の ファ イル 容量 を 調べ る . 


Recs Bytes Ext acc 


14 2k 1 R/M AiSAMPLE。 COM 2K バ イト 長 . 本 章 で 取り 上 げ だ コン バイ ラ の 中 で 最も コン パク フト. 
Bytes Remaining Dn i 246k 


2 


Figure-5.8.4 コン パイ ル に より 生成 され た “HEX” ファ イル に 対し , LOAD コマ ンド の 実行 . 


この よう に 他 の コン パイ ラ と 比較 し て , 大 変 コ ン パ クト な オプ ジェ クト ・ フ ァイル が で き 上 り ま し 
た . 本 章 で 取り 上 げた 言語 の 中 で は 最小 で す . 
で き 上 っ た "SAMPLE′ プロ グラ ム を 実行 し て み ま し ょ う . 


A>BAMPLE ) SAMPLE* プ ログ ラム の 実行 . 


1+2+ さ + す 。。。。n = 
1nput ロロ (n = 1。.。.25O) ーー> き QO 』 -…--2251 以 上 の 入力 値 の エラ ー. 
input n (n = 1。.。.25O) ーー>2SO / 再度 正しい 値 を 入力 . 

1+2+ さ +。 。 。 、 25O= さ 13 さ 75 入力 仁 と 答え が 出力 され て いる . 


人 > 


Figure-5.8.5 Rgy FORTH に より 作成 され た “SAMPLE” プロ グラ ム の 実行. 


次 に 参考 まで に , Rgy FORTH に 付属 の デバ ッ ガ で ある FDT の 実行 例 と 。 コン パイ ル に より 生 
成 さ きれ た リス ト ・ フ ァイル “SAMPLE . PRN” の 一 部 を 示し て お きま す . 
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rー 一 キ 印 は 入力 する 行 . 
ーー シン ポリ ッ フ に デバ パッ グ が 可能 と な る よう に , シン ボル ・ テ ー ブ ル を 読み 込む . 


>FDT SAMPLE-HEX B 』 ^SAMPLE. HEX" に 対し て FDT を 起動 . 


RIGY CO. ZBO FOURTH DEBUGBGBER "FDT(ZBO) V2.0" 

O10O-O7AZ NEXT=O7AB PC=OOOO SQVE= フ FREEMQX=A さ DB (SYMBOL IN) 
ーー FORTH ワ ー ド を 実行 する コマ ンド . 
ーーF "8 ー-ASCII の 0--9 を チエ ッ ク す ずる. 入力 と し て `8* を 与え だ . 

*FDRTH RETURN* 

PS(QEFE) OOO1 リーン され だ 値 は " 真 " で ある . 


ーー テ F "AA" ?0-9 -- 今 回 は ^A" を 与え だ . 
*FDRTH RETURN* 
PS (AEFE) OOQO リターン され だ 値 は " 偽 " で ある . 

ーーF "5 CE -ASCll… バ イナ リ 変 換 の ワー ド . 入力 と し て *5" を 写 え だ . 
*FDRTH RETURN* 

ー テ PS(AEFC) OOQS ooo1 

ーーF て 4 4 _ 変 拠 OK 


4 
ー 変換 され だ 信 
人 eS Ctrl-C で CPZM に 戻る . 


Figure-5.8.6 Rgy FORTH デベ バッカ FDT の 実行 . 


>TYPE SAMPLE .PRN / 


RIGY CO。 Z8O FOURTH COMPILER "FZBO V2.0" 18205159 PAGE 1 


党 Rgy FURTH sample progrem for "APDP11C 
ation CPZ/M" 学 


TITLE * SAMPLE PROGRAN* 
READLIB 


O6SAiE9DD O2 く 7 O15C OO2F O351 .。 』 ?20-9 DUP 2FH > SMAP さ AH < FAND 』 


O67O』E9DD sk ASCII-BIN \ENTRY TOPiASC 
II NIBL R 
\EXIT TOPi1/O 
(1=OK ) 
\\2NDs BINARY DAaT 
a 
Q672』02 さ 7 O65A DUP ?0-9 
0676』O171 OOQOO O1SC OO さ O O2D6. . IF "O' 一 。1 
O6B2 ュ O17A OOOO O25 さ O16B ELSE DROP。 O 
O6BAr O1 さ E THEN 5 
O6BC CONBUFF DS し 
O692』E9DD 』 STRING>NUNBER \EXIT TOPi 1/Q 
\2ND』 BINQARY DaT 
Aa 


O6943015C O6BE O295 (CUNBUFF + 2) >R 4 
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RIGY CO. ZBO FOURTH CUDMPILER "FZBO V2.0O" 18205159 PAGE 
SANMPLE PRUGRAN SA 


ネオ ネネ GYMBDL 一 TABLE まま 


8 F O1D2 生ま +LUOP F O1CO 生ま ネー エド F O182 
も 多 COLUN F EDD 和 $ ま DO F O189 証 $ELSE F 0Q17 人 
まる FALSE F Oi6B トス すう 1 コ F O171 ま $JMP F O17A 
$ も LITERAL F OiSC LDP F QO19E も $REPEAT F O172 
SEI F Q1SE $$TRUE F O165 生ま $UNT TL F Oi171 
に F O2F9 + F O2CF あき F oO206 
SM ! F O21E SwaB F OS3CC SMAN F oO さ D さ 
SMAP F 025A 


NE XTPC=O7ABH  。 NEXTDP=O7QBH FREESYMNO= 1 さ 366 
COMPLETE CUNPILATION 


仙 > 


Figure-5.8.7 リス ト ・ フ ァイル の タイ プア ウト . 
Rgy FORTH の , その 他 の 多く の 機能 の 紹介 は 省略 し ます . 
5.9 LISP 


5.9.1 LISP に つい て 


LISP は , 1960 年 に 出版 され た John McCarthy に よる , 「Recursive Functions of Symbolic 
Expressions and Their Computation by Machine」 と いう 著書 が その 基本 と な っ て お り , 同年 に は 
最初 の LISP が すでに 稼動 し て いま す . この LISP は 現在 で は , 純 LISP と 呼ば れ て いま す . 

LISP の 特徴 は 第 1 に リス ト 処 理 で す . その リス ト 構 造 は COBOL や , FORTRAN, PL ノ 1 な 
ど で は 書き 表せ な い , 実行 中 に 動 的 に 変化 する デー タ 構 造 を 再帰 的 に 定義 むす る こと が で きる も の で す . 

LISP は , 数 式 の 記号 的 な 処理 、 コ ンピュータ に よる パズル の 解読 や 定理 証明 な どの 人 工 知能 研究 の 
分 野 に 。 な く て は な ら な い プ ログ ラミ ング 言語 と し て 広く 使 あ れ て いま す 、。 

LISP は , 整数 、 実 数 文字数. 配列 な どの デー タ の 型 の 区 別 が な い 単 一 デー タ 形 式 で あり , また , 
LISP の ピロ グ ラム や LISP の デー タ と し て 処理 し て ,。 デ ログ ラム と し で て 実行 する と ゆず よう な こと 
も 可能 で す . 


LISP は , 一 度 作 られ た デー タ を 書き 換え る こと は な <〈 ( 純 LISP), 書き 換え が 必要 な 場合 は , 旧 
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デー タ は その まま に し て , 新 デー タ を 新しく 作っ て 使用 し ます (LISP 1.5 に は . 書 き 換え の 機能 あり ). 
その た め ,。 メモ リ を どん どん 消費 し て し まう の で , “Garbage Collect : ガー ベジ ・ コ レク ト ” と 呼ば 
れる 不用 デー タ の “ゴミ そう じ ” の 機能 を 持っ た シス テム ・ サ ブ プルー チン が 用 意 き れ て いる の も 特徴 
で す 、 

いずれ に し て も LISP は , 一 般 的 な 言語 と 相当 に 趣 を 異 に する も の で あり , COBOL や FORTRAN 
の プロ フェ ッ シ ョ ナル と 言え ども 。 最初 し ば らく は と ま ど う こと に な る で し ょ う 。 

現在 , LISP と 言え ば 普通 , LISP 1.5 ( 純 LISP に 諸 機 能 を 追加 し た も の ) を 指し ます . 


5.9.2 The Soft Warehouse 社 muLISP に つい て 


muLISP は , LISP 1.5 に いく つか の 機能 を 追加 し た LISP 1.5 の 上 位 コ ン パ チ プ ブル に 当たる LISP で 
す . 

muLISP の 最初 の バー ジョ ン は , 1977 年 に 発売 され た muLISP-77 で あり , その 人 後 1979 年 と 1980 年 
に 大 き な バ バー ジョン ・ ア ッ プ が 行わ れ , 現在 は , muLISP-80 と な っ て いま す . ここ で 取り 上 げた の は 
muLISP-80 で あり , これ は 従来 の muLISP に 、 さら に 多く の コー ド と 高速 処理 を 実現 する た め に , 
疑似 コー ド ・ コ ン パ イラ と イン ター プリ タ を 追加 し た も の で す . muLISP の 特徴 は , 


@ 合計 85 の LISP ファ ンク ショ ン が , マシ ン 語 で 定義 され て いる . 

@ 2 パス の コン パク ト な ガー ベジ ・ コ レク タ が 用 意 き さき れ て お り , デー タ ・ ス ペー ス の すべ て の メモ 
リ を ダイ ナミ ッ ク に 管理 し . さら に ガー ベジ ・ コ レク ショ ン の 実行 後 , 自動 的 に デー タ の リロ ケ 
ーション が 最適 と な る よう に ダイ ナミ ッ ク な メモ リ 操 作 が 行わ れる . 

@ エ ディ タ と トレ ー ス の 会 話 形 レジ デン ト ・ デ バッ か ガ が 付属 し て いる . 

@ フ ァ ン クシ ョ ン 定 義 は , 自動 的 に D コ ー ド (distilled-code) に コン パイ ル さ れ , メモ リ の 節約 と 
高速 化 を 可能 と し て いる . 


な ど で あ り , muLISP は 中 間 コ ー ド (D コ ー ド ) に コン パイ ル し た 後 。 イン ター プリ タ で 実行 する 
と いう 形式 を と っ て いま す . 


5.9.3 muLISP に よる 「SAMPLE」 プ ログ ラム の 作成 


まず , muLISP に よる “SAMPLE′ プロ グラ ム の ソー ス ・ フ ァイル を 示し ます . ファ イル 名 の エク 
ステ ンション は 何で あっ て も 実行 に は 関係 あり ませ ん が , “LIB” が デフ ォ ー ル ト に 指定 され て いる の 
で 。 これ に 従 % ま す - 
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A>TYPE SAMPLE。 し LiB ファ イル 名 の エフ ステ ンション は 何で あつ て も よい が , 
*LIB? ザ が デフォー ルト に 指定 され て いる . 


ん muLISP sample program for "App1ication CP/ ノ NM" ん 
完 ー% の 間 が コメント と な る . 
(PROG1 "" ん Definition of DEFUN X 
(PUTD DEFUN (QUOTE | 
(NLAMBDQA (FUNC DEF ) 
(PUTD FUNC DEF ) 


| 関数 YDEFUN* の 定義 . 


か | 
EDEFUN SAMPLE (LANBDA (N NUMB TEMP ) 
(TERPR1 ) ん CR & LF X 
(PRINT "1+2+ さ て す 。。。。n デー ぷり ) ん t1t1e ん 
(LUOP (PRIN1 "inPut n ロ (n = 1...25O) ーー>") 多 prOmpt messaqe ん 
(SETQ N (READ) ) ん input n ん 
((QND (NUMBERP N)〉 ん is number ? スス 
(PLUSP N) 4 ん n> 0 タマ ル 4 
(LESSP N 251 ) ) ) ) ん n < 256 2 ル 4 


(SETQ TEIIP (SETQ NUMB N) ) 

(LUOP (SETQI NUMB (DIFFERENCE NUMB 1) ) 
((ZEROP NUMB) ) 
(SETQ TEMP (PLUS TENMP NUMB) ) ) 


TEMP = NUMB ae n メ 
NUMB 』= NUMB - 1 % "SAMPLE* の 定義 . 
ュ f NUMB = O then exit % 
TEMP = TEMP + NUMB 
and rePEat ん 


NNN 


(TERPR1 ) 

(PRIN1 "1+2+ さ +。。。。 ") (PRIN1 N) 
(PRIN1 " = ") (PRINT TENMP) 
(TERPR1 ) 

(SYSTENM] ----- 最 後に CP _M に 戻る を め の フ ァ ン クション. ん return to CP/N ん 


Print messaq ら and NX 
Print answer ん 


ESAMPLE (RDS] SAMPLE” の 実行. ん exeC と ut PrOgFam ん 
\ Aa> 2 
Figure-5.9.1 muLISP に よる “SAMPLE” プロ グラ ム の ソー ス ・ フ ァイル . 


次 に , muLISP の パッ ケー ジ の 中 か ら , “SAMPLE” プロ グラ ム を 開発 する た め に 必要 な 最低 限 の 
ファ イル を 示し ます . 


>BsSTAT ま 。*/ 


RECS BYTES EXT ACC 
に バリ 10K 1 R/W AsMULISP。 COM コン バイ ラブ イン ター プリ ダ . 


125 16K 1 R/M AiMUSTAR。 SYS - ス フリ ー ン ・ エ ディ タ デバ パッ ガ . (直接 に は 秘 要 な い ) 
11 2K 1 R/M AsSAMPLE。LTB SAMPLE" プ ログ ラム の ソー ス ・ フ ァイル . 
BYTES REMAINING UN Qi 21 さ K 


> 


Figure-5.9.2 muLISP に よる SAMPLE”" プロ グラ ム の 開発 に 必要 な 最低 限 の ファ イル . 


ンス 


LISP 


muLISP は , 中 間 言 語 の イン ター プリ タ な の で ,。 まず イン ター プリ タ (中 間 言語 へ の コン パイ ラ を 
含む ) を ロー ド し て , その 上 で ソー ス ・ フ ァイル を 読み 込ん で 、 そ の まま プロ グラ ム の 実行 に 移り ま 
す . よっ て , コン パイ ル や リン ク の 作業 は 必要 あり ませ ん . 

YSAMPLE′” プロ グラ ム の 実行 例 を 次 に 示し ます . 


A>MULISP ) …… イ ンタ ー プ リタ (中 間 言 語 へ の コン バイ ラ を 含む) を 起動 . 


muLISP-BO 2.15 (0O さ /O1/2) 
Standard CP/M Version 
Copyright ( ビ ) 1981 The SOFT WARKEHDUSE 
Licensed by MICRDSDFT。 Inc-。 


和 を (RDS SAHPLE LIB》) イン マー ブリ マガ 起動 する と , プロ ンプ ト の `$" が 出力 され 
SAMPLE RDSCredirection) で , 入力 を コン ソー ル か ら `SAMPLE. L1B" フ ァイル に 変換 す る . 
ファ イル 名 の ". “を 書い て は いけ な い . 


き この 剛 に 上 9 に ソー ス ・ フ ァ 
イル が ロード され , 中 間 告 語 に コ 
"| 誠 問 イン ター プリ タ ピ 


よる 実行 が 開始 され る . 
1+2+ さ +。。。。n ニー X 


inPut n (n = 1。.。25O) ーー>280_) 251 以 上 の 入力 億 エラ ー. 
input n (n = 1。..25O) ーー>30O ) 今回 は 正しい 入力 . 


1+2+ さ + 。 。 。。 100 = SOSO ---- 入 力 値 と 答え が 出力 され だ . 


・ 還 昌 YS  / 


Figure-5.9.3 muLISP に よる “SAMPLE” プロ グラ ム の 実行 例 . 


muLISP に は , LISP プロ グラ ム の 開発 の た め に , muSTAR と 呼ぶ Artificial Intelligence 
Development System(AIDS) が 付属 し て いま す . この ツー ル が Figure-5.9.2 の ~muSTAR. COM”" で あり , 
この AIDS に より LISP プロ グラ ム の 作成 に 適し た スク リー ン ・ エ ディ タ と トレ ー ス 機能 を 持っ た 
デバ ッ ガ , それ に ディ スク ・ フ ァイル の 操作 な ど が 可能 と な り ま す . 

参考 まで に , muSTAR を 起動 し て , 最初 の メニ ュー 画面 を 示し て お きま す . 


AA>MULISP MUSTAR ) muLISP か ら muSTAR を 起動 . 
mulL1BP-BO 2。15 (0O さ /O1/8B2) 

Standard CP/M Version 

Copyright ( ビ ) 1981 The SUFT MAREHOUSE 
Licensed by MICROSDFT。 Inc。 


ご の 時 点 で スク リー ン が フリ ア さ れ , 次 の コマ ンド メニ ユー が ガ 出 力 さ れる . 


DPTIONBS 
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Figure-5.9.4 スク リー ン ・ エ ディ タン デバ ッ ガ の muSTAR を 起動 し た と ころ . 


muLISP の その他 の 多く の 機能 の 紹介 は 省略 し ます . 


5.10 ALGOL 


5.10.1 ALGOL に つい て 


ALGOL (ALGOrithmic Language) は 、1958 年 に 発表 きれ た 科学 技術 計算 用 の プロ グラ ミン グ 言 
語 。 IAL (International Algebraic Language) を 基 に し て , 内 容 の 改訂 と 機能 の 拡張 を 行い . 1960 
年 に アル ゴリ ズム 記述 言語 ALGOL 60 と し て 登場 し まし た . これ が 現在 の ALGOL の 基 と な っ て い 
まず 。 

今日 の 進歩 し た プロ グラ ミン グ 言 語 か ら み る と , ALGOL は も は や 歴史 上 の も の と な っ て し まい ま 
し た が , プロ グラ ム の 記述 法 や コン パイ ラ の テク ニッ ク な ど 。 以後 の 言語 に 与え た 影響 は 大 きく , こ 
こ で も あえ て 取り 上 げ ま し た 。 

5.10.2 Mark Moranville ALGOL-M に つい て 


ALGOL-M は , ALGOL-60 を 基 に , マイ クロ コン ピュ ー タ 上 で の プロ グラ ミン グ に 適する よう に 作 
られ た 言語 で す . 基本 構成 は ALGOL-60 と ほとん ど 同 じ で あり , ALGOL-60 で 作ら れ た 従来 の プロ グ 
ラム は , 若干 の 書き 換え で ALGOL-M 上 で 実行 する こと が 可能 で す . 

ALGOL-M は 。 コン パイ ラブ イン ター プリ タ で あり , ALGOL-M の ソー ス ・ プ ログ ラム を 中 間 コ 
ー ド に コン パイ ル し , それ を 実行 時 に イン ター プリ タ で 実行 し ます . 実行 時 に は , デバ ッ グ の た め の 

~ ト レー ス ” の 機能 も あり ます . 
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ALGOL-M で 使用 で きる 変数 は , 一 16383 一 十 16383 の integer、18 デ ジッ ト 以 下 の decimal, 255 文 
字 以 下 の string の 3 つの タイ プ で あり , デフ ォ ー ル ト は decimal が 10 デ ジッ ト , string が 10 文 字 と 
な っ て いま す . 

配列 は 255dimension まで で お の お の は 0 16383 の 値 を 持つ こと が で きま す . 


5.10.3 ALGOL -M に よる 「SAMPLE」 プ ログ ラム の 作成 


まず , ALGOL-M に よる “SAMPLE” プロ グラ ム の ソー ス ・ フ ァイル を 示し ます , 


A>TVPE BAM 人 PLE・6LB ファ イル 名 の エフ ステ ンション は 和 め ぬ ず "ALG“ で ある こと . 
begin ……ALGOL の ブロ グラ ム は *begin* で 始ま り *end* で 終わ る . 


と omment QALGODL-M samp1e program for "appP1ication CP/M" 
コメ ント は , "begin* の あと , まだ は “の あと の "comment-:" の 間 に 自由 に 書く (少々 めん どう ). 


integer num。numb。 も emPp 3 COmment キ variable declaration sj 


writ@ ("1+ つ フォ さす 。。。。n ニー k") ョ と Omm@nt ま print title * 
write ("31nput n ( n ロ =1。。。1BO )" う 5 と 〇 mm ロロ 上 * DFin 上 1 ロロ い t me る ら ロ G # 
read(num) ョ と Ommーnt まき input n 


COmm@ht # ranqe check 
whi 1 num > 18O do 
beqgin ALGOL-M の 整数 は -16383ー+16383 の 範囲 し か 扱え な い 、. 
write ("input n ( ロ =1。。.18O )")』 よ つ て 250 で は オー バ す る の で 180 に 変更 し て ある 、. 
read(num) ョ 
end ョ 


numbs = nums 
temDi= nums 


て Ont \ COmDut@ ぅ # 
while num >= 1 do 
beqgin 
nums = num 一 1 
temDk = 上 @mD + nu 
ends 


write ("ゆう 5 と OmmGnt ※ DFint res5ult 


write@ ("1+2+ さ +。。。。、 "numb。" = "temD) 5 
write ("9!) ョ 


二 れ ドー この end 以 後 は 何 を 書い て も よい . 覚え 書き な ど が よ ぐ 審 ガ れる . 


Figure-5.10.1 ALGOL-M に よる “SAMPLE” プロ グラ ム の ソー ス ・ フ ァイル . 


次 に ALGOL-M の パッ ケー ジ の 中 か ら , “SAMPLE” プロ グラ ム の 開発 に 必要 な 最低 限 の ファ イ 
ル を 示し て お きま す . 


フフ 5 


台 種 高級 言語 に よる 同一 主題 ソフ ト 開 発 賠 


A>BISTAT # き .* リ 


Recs Bytes Ext Acc 
106 14k 1 R/M AsALBOLM. COM 中 間 言 語 へ の コン バイ ラ . 


112 14k 1 R/M AsRUNALG。 COM ラン タイム ・ イ ンタ ー プ リタ . 
6 1k 1 R/W AsSAMPLE。QLG SAMPLE" プ ログラム の ソー ス ・ フ ァイル . 


Bytes Remaining ロ n Qi 212k 


人 > 


Figure-5.10.2 ALGOL-M に よる SAMPLE" プログラム の 開発 に 必要 な 最低 限 の 各 フ ァイル . 


ALGOL-M は イン ター プリ タ で す . ソー ス ・ プ ログ ラム を “ALGOLM . COM”" に よっ て 中 間 言 語 
に コン パイ ル し , それ を イン ター プリ タ の “RUNALG . COM” に よっ て 実行 し ます . 
で は , 中 間 言語 へ の コン パイ ラ の 実行 例 を 示し ます . 


A>DIR_ SAMPLEE。$ / 最初 の ^SAMPLE* フ ァイル の 確 語 
ni SANPLE fnLG ソー ス ・ フ ァイル の み 存 在 . 


>ALGULM SAMPLE / コン バイ ラ の 実行. 
RALGOL-M CUMPILER VERS 1.1 
O ERROR(S) DETECTED 


コン バイ ル 成 功 . エラ ー な し . 
A>DIR SAMPLE.*/ 生成 され だ ファ イル の 確認 . 


As SAMPLE ALG 』 SAMPLE AaIN 
ソー ス ・ フ ァイル 生成 され だ 中 間 言 語 
> の ファ イル 


Figure-5.10.3 ALGOL-M に よる 中 間 言語 へ の コン パイ ル 例 . 


コン パイ ル は 成功 し て , 中 間 言 語 の ファ イル “SAMPLE . AIN” が 生成 され て いま す . 

これ が ALGOL-M で は , 最終 的 な ファ イル と な り ま す . 

で は “SAMPLE” プロ グラ ム を 実行 し て み ま し ょ う . 

ALGOL-M は 整数 の 男 囲 が ー16383 一 十 16383 し か 扱え な い の で , 入力 は 180 以 上 は エラ ー と な る よ 


うに 変 更 し て あり ます. 


A>RUNALG _ SAMPLE / -- 中 間 言 語 の イン ター プリ タ に よる ~SAMPLE" プ ログ ラム の 実行 . 


LGSUL-N INTERPRETER-VERS 1.O 


276 
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ALGOL-M で は , 整数 は 16383ー+16383 の 範囲 し か 扱え な い の で , 
1+2+ さ + す 。。。。n = x 「! 250 で は オー バ す る . 
1nPut n ( ロ =1.。。1HO ) 
ー> さ OO ) ……-ALGOL-M で は , コ ン ソ ー ル 入力 は 有 ず 加 放 ・ gp れ ・ ー〉" ガ ALGOL-M の シス テム に より 出力 され る . 
input n ( ne1・・・18O ) 180 以 上 の 入力 値 エ 
ー> 10O / 今回 は 正しい 億 を 入力 . 


1+24 さ +。 。。。 1OO = SO5O … 入力 填 と 呑 え が 出 力 さ れ だ . 
A> 


Figure-5.10.4 ALGOL-M に より 作成 され た "SAMPLE" プロ グラ ム の 実行 . 


参考 まで に , リス ト ア ウト 二 ト レー ス ・ モ ー ド の オプ ショ ン ・ ス イッ チ を 付け て , コン パイ ラ を 実 
行 し た 場合 の コン ソー ル 出 力 を 次 に 示し て お きま す . 


>ALGOLN SAMPLE *AE リ / 
ALGDL-M CDMPILER VERS 1.1 


に 
# 
5 


commen も ALGOLーM sample program for "App11cCation CP/" 日 


integer num。numb も tempg comment ま variable declaratiorn 』 


Write ("1+2+ さ + す 。。。。n = x") ョ COmment * print title ョ 』 
write ("inpPut n ( nsi.、.1BO )!) ョ COmmEnt ま # Print input message 』 
read(num) 』 Comment * input ns 


と Omment ま と an Chec に ョ * 
while num > 1BO do 
begin 
write ("input n ( nei、。.18O )")』 
rgad (num) ョ 
nd 


huURND3 = num3 
tempa= nums 


と Omment * Computge 』 
while num >= 1 do 
begin 
numsm num 一 1 
temps = temp + numi 
@nd 


write (" ") ョ comment * print result ョ 』 
Write ("1+2+ さ +。。。 "numb。" = "。temp)』 
write (" 1 


O ッ フ ・ レ ベル 
の ジロ ッ ク グ ・ 
9 ERRDR (8) DETECTED 
A> ライ ン No. 


Figure-5.10.5 スイッチ“$AE” (リス ト ア ウト 十 ト レー ス ) を 付け て の コン パイ ラ の 実行 . 
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ALGOL-M の , その 他 の 多く の 機能 の 紹介 は 省略 し ます . 
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5.11 APL 


5.11.1 APL に つい て 


APL (A Programming Language) は 、1956 年 か ら 開 発 が 始ま り , 1960 年 に 対話 形式 の プロ グラ 
ミン グ 言 語 と し て 実用 化 さ きれ まし た . 当初 は IBM の 内 部 で 使用 きれ て お り , 一 般 に は , 1968 年 に IBM 
シス テム 360 の TSS で 使用 きれ 始め まし た . 

APL は 基本 的 に は , 0 (スカ ラ ) 次 元 以 上 任意 の 配列 デー タ を 対象 に 演算 を 行う も の で , すべ て の 
操作 は 関数 の 集まり で 表現 され , その 文法 は 極め て 単純 で あり , IF と か DO, 各種 官 言 文 な ど は 一 
切 あ り ま せん . 

二 項 まで の 引数 を 持つ 関数 と 、 その 関数 の 引数 と な る スカ ラー, も し く は 1 次 元 以上 の 任意 の 配列 
の みて 構成 きれ , その 処理 系 は イン ター プリ タ の 形式 を と っ て いま す . よっ て , BASIC 言語 の よ うに, 
コン ピュ ー タ と 会 話し な が ら プ ログ ラミ ング を 行う こと が で き , APL の 知識 の な い 人 で も , 直接 キー 
ボー ド に 向い 、 マ ニュ アル に 従っ て キー イン し て 行け ば , 即 そ の 答え が 返っ て くる の で , 効果 的 に 学 
過す る こと が 人 で きま ます 。 

APL は , デー タ 解 析 や 数 値 解析 の 分 野 、 ベ クト ル や 配列 演算 を 多く 行わ な けれ ば な ら な い グ ラフ ィ 
ックス の 分 野 な ど に , 強力 な 言語 と し て 利用 され て いま す . 

APL は , 特種 な 文字 や 記号 を 持つ キー ボー ド を 使い ます の で , その モデ ル (IBM 2741 キー ボー 
ド ) を 次 に 示し て お きま す . 


Figure-5.11.1 APL の 正式 な キー ボー ド 


APL 


5.11.2 SOFTRONICS 社 APLN8O に つい て 
SOFTRONICS の APL イン ター プリ タ は , フル APL の ほとん どの 機能 を 持っ て お り , CPM の 
ディ スク 1 プ O の た め の シ ステ ム ・ フ ァ ン クシ ョ ン と 変数 。 シ ステ ム ・ コ マン ド な ど を 備え て いま す . 
CP/M で APL を 使う と 言っ て も , あの 特殊 文字 は どう する の か と 疑問 を 持た れる と 思い ます が 
SOFTRONICS APL は , ター ミナ ル の 種類 に よっ て , “ASCII モー ド ” と “APL ター ミナ ル ・ モ ー 
ド ” が あり , APL の 特殊 文字 を 持た な い 普 通 の CPM マシ ン で は , “ASCII モー ド / で 実行 する 
ご 必 が で きま す .、 
"ASCII モー ド ” と 言う の は 。 例え ば , 


ディ メン ショ ン の の …$RO 
逆行 列 の 円 …$XD 
ロー テー ト の 〆 …$RT 


と 言っ た 具合 に , 特殊 文字 を $ に 続く アス キー 標準 文字 の 2 字 で 代用 し ます . 入出 力 と も , これ に よ 
り 表現 し ます . 

YAPL ター ミナ ル ・ モ ー ド ” と 言う の は , IBM の 2741, 2740, 3767 な どの APL 用 の ター ミナ ル を 
接続 で きる 場合 の モー ド で あり , 正式 の APL 文字 に よる 操作 が 行え を ます . CPM マシ ン で は , キ 
ー ボ ー ド に 特殊 文字 を 書い た ステ ッ カ を 貼り スク リー ン の 表示 に キャ ラク タ を ユー ザー が 任意 に 作 
り 出す こと が で きる VRAM な ど を 使え 々 ば この モー ド で の 操作 が 可能 で す . APL の お も し ろ き が 分 
か っ て くる と , 基 非 そ た うし た く な る で し ょ う (米国 で は , この APL 記 号 を 表示 で き る S-100 バ ス の V-RAM 
ポー ド が 市 販 さ れ て いる ). 


5.11.3 APLNBO に よる 「SAMPLE」 プ ログ ラム の 作成 

この APLN80 の お も し ろ さ に は , 筆者 も いさ さか 興味 を 持ち まし た の で , 本 項 は 少々 雰囲気 を 変え 
て 解説 し た いと 思い ます . 

*APL ヽ N80′ の バッ クス ラッ シュ は , IBM の APL が , “APL ヽ 360′ と いう よう に 名 付け られ て い 
る の で , それ に 従っ た も の と 思わ れ ま す . 

実は , 筆者 は 実際 に APL を 自分 の 手 で いろ いろ 動か し て みる の は , この APL ヽ 80 が 最初 で す .CP/ 
M 上 で 走る APL が ある と いう こと は 以前 か ら 知 っ て いま し た が , 実際 に 自分 の S-100BUS マシ ン 
や , PC-8801 の CPM で 走ら せ て みる と , こ の APL と いう 言語 は , 実に 興奮 きせ る も の が あり ます. 

イン ター プリ タ 形 式 な の で , 普通 の パー ソナ ル ・ コ ンピュータ の ROM に 組み 込ま れ て いる BASIC 
イン ター プリ タ と 同様 に 。 コン ピュ ー タ と 会 話し な が ら 非 常に 気軽 に いろ いろ と 試み る こと が で き 。, 
楽し く 学 ぶ こ と が で きま す . 
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A2 柏 P … ペ PL を 起動 [ロコ ー ザ ー の キー 入力 部 分 . キ ヤリ ッ ジ ・ リ タン を 伴う . 


SDFTRUNICS APL\BO 
VERSIN 2. さ ビ 


COPYRIGHT 1979 BY ERIK MUELLER 
CLEAR MS ワー キン グ ・ ス ペー ス は 空 と いう メ ツ セー ジ が 出 て , コマ ンド の 入力 待ち と な る . 


St20] 5+20 
2 は る の ここ で 使用 する 代用 記号 の , 正規 
導 和 と : 5 ょ 20 の APL 記 号 を 次 に 示し ます . 
・25 
ーー に 5 を 定義 
・* J に 20 を 定 凌 
2 J-1 
15 
KJ 
1oo 


1 る 7 す 引 …: 変数 A に 配列 123…9 を 3x3 の 行列 に 変換 し て 定義 する . 


同じ く 変 数 B に 行列 を 定義 . 


1 
2 に 】 
さ 


に 】 | 行列 A の 転 置 行 列 . 
飼 


行列 A を 反転 し だ も の を 変数 AREV と し て 定義 
に タイ ブ ア ウ ト . 

ざさ と - 1 | 

に -】 に] 4 [行列 A の 反転 行列 . 

9 全 。 プ | 


行列 A を 指数 で タイ プア ウト 〈@^). 
2.71 昌 2 7. さ B905 20.OB55 
54 .5981 14 昌 .41 さ 40 さ 。 42 昌 
1096。6 さ 2980.95 810 さ .O6 


9 行列 A の 自然 対数 を と つて , 変数 ACOG と し て 定義 
ー その タイ ブ ア ウ ト . 
O .69 さ 147 1.O09861 
1 . さ 629 1.60944 1.79176 
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1 .94591 2.O7944 2.19722 


現在 定義 され て いる 変数 の すべ て を マイ プア ウト . 
1 J QA B ATP AREV ALOG 


> 


Figure-5.11.2 APL の 操作 は 大 変 簡単 で す . 


この よう に 実に シン プル な 言語 で す . 

さて , SAMPLE” プロ グラ ム を , この APL ヽ 80 で 作成 する 訳 で す が , その ソー ス ・ プ ログ ラム の 
作成 は 、 本章 で 取り 上 げた 他 の 言語 の よう に , 任意 の エディ タ を 使っ て , 言語 シス テム と は 独立 し て 
別に 作成 する こと が で きま せん . ソー ス ・ プ ログ ラム は , APL シス テム に 入っ て , その 中 で の み 作 成 
され ます . 

イン ター プリ タ な の で , 作成 中 の プロ グラ ム の 一 部 分 を 実行 し て 、 デ バッ グ を 行う こと も 可能 で す . 
実行 中 に バグ が あれ ば , エラ ー の ある ライ ン の 内 容 を 表示 し て , 実行 を スト ッ プ し ます . 

で は , 「APLN80 の 起動 一 "SAMPLE” プロ グラ ム の 入力 一 実行 つ デ バッ グ 実 行 一 完成 し た プロ グ 
ラム の ディ スク へ の セー アプ 」 の 手順 を 次 に 示し ます . 


を APL.COM を 起動 . [] 部 は ユー ザー の キー イン 部 を 示し , キ ヤリ ツジ ・ リ タン を 伴う . 


SOFTRUNICS APL\BO 


VERSTDN 2< さ C | 素 は /\ ッ フス ラッ シコ へ "で ある . 日 本 の プリ ンタ で は 実に サマ に な ら な い (80 円 の APL). 


COPYRIGHT 1979 BY ERIK MUELLER 

IAPL で は , シス テム の 応答 は この 位置 か ら 表示 され る . 

CLEAR IMB ワー ク ・ ス ペー ス に は 何 も な いこ と を 示す ず . 

失 生 1 い に )SSE 現時 点 で 定義 され て いる 関数 を すべ て タイ プア ウト せよ . 結果 は 空白 の 応答 で 何 も 定 義 さ れ て いな い . 
inone !=-APL で は , ユー ザー の キー イン する も の は この 位置 か ら 表 示さ れる . 

0 | BPNET - ヾ SAMPLE^ プ ログ ラム を 関数 SAMPLE と し て 定義 モー ド に 入る . 
E11S IP 改行. その 引数 は な い . 


2] へ | 1+2+ き +。 。。。n = マイ トル の 出力 . 
[ く ] ら | [READ』 "inBut n (n = 1.。.250) ーーー? 引 入力 メ ツ セージ の 出力 と ラベ ル *READ* の 宣言 . 
E4]L IE (2SQ く <N_ B PF_$EV $QP RD] 数 字 を 入力 し て N_NUMB, TEMP に 代入 . 値 が 250 よ り 大 の 
t5]E DRPU MP_TEMP B_NUMB-】] ---NUMBーNUMB-1, TEMPーTEMP+ NUMB. 時 は READ へ 帰る . 
6 る 1 | ME MPUTE| NUMB デ 0 な ら COMPUTE へ 、. 
7] グ 
E81 ラ ーー 入力 値 と 宮 え の 出力 . 
E9] ム 1 
E1o] | 
DFN 還 前 出 . 
SAMPLE 


1+2+ さ +。。。。n = ※ 


input n ロ (n = 1。。-.25O) ーー 
3 251 以 上 の 入力 値 エ ラー. APL で は 入力 時 は 秒 ず 改行 が 行わ れる . 
input n (n デー 1。。.-.25O) ーーー※ 
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ee 入力 値 エラ ー. 

input n (n = 1.。..25O) ーー 

I2SO] 正しい 値 を 入力 . 

SYNTAX ERROR …… プ ログ ラム に バグ あり / エー ミスタ イブ. "で は な ぐ ""“ ガ 正解 

SAr1PLEEB] $ ロ D "1+2+ さ +。。。。” 。( ま FN N) っ /=* 。($FN TEMP)-… エ ラー の ある ライ ン が 表示 され る ., 


ほ DL_BAPMPLE] 編集 モー ド に 入れ . 
[ 10] | IEB$QD]] ライ ン [8] を 表示 し て , 再 入力 モー ド に 入れ . だ だ し 1 行 全部 を ツイ プレ 直す 秘 要 あり . 
[8B] $D "1+2+ さ +。。。。' 。( 和 FM N) 。/=” 。( ま FM TEMP) 

引き MP 


9 めん どう で も 1 行 全部 を ツイ プ し 画す . 


1+2+ さ +。。。。n ー x 


1nDut n ロ (n = 1。。..25O) ご ーーー テ 
2 250 を 入力 . 


1+2+ さ +。 。 。 。250 = 175 -…- 入 力 値 と 答え が 正 し ぐ 出力 され だ (その まま CPZM に 戻る こと は で き な い ). 
も う 1 良 実行 


1+2+ さ す 。。。。n = 
inPu も t n ロ (n = 1。.。。.25O) どー エー デ 


正しい / 


[SAVE_SAHPLE] "SAMPLE^ プ ログ ラム を ディ スク に セー ブ す る . 正しく 表現 する と 。 現在 の WS( ワ ー キ ング ・ ス 
SAMPLE SAVED ベー ス ) の 全部 を セー ブ す る . これ は 関数 SAMPLE の み を セー プ す る の で は な ぐ , こ の 時 点 で 定義 
[DOFP] CPM に 戻る . 注 の の すべ て の 関数 や 変数 (この 例 で は *SAMPLE* の み し カ 存在 し な い が ) を セー プ す る も の で あ 

8 り , 後 で これ を ロー ド す る と , セー プ し だ 時 点 と 同じ 状態 を 再現 で きる . 


Figure-5.11.3 APLN80 に よる “SAMPLE" プロ グラ ム の 作成 の 全 過 程 . 


以上 の 手順 で "SAMPLE” プロ グラ ム は で き 上 り , 実際 に 使用 テス ト も 行い まし た . ディ スク 上 に 
は ほ 。 その プロ グラ ム ・ フ ァイル (アス キー・ マ ァイル で は な く 《。 中 間 コ ー ド ) "SAMPLE、APL” が 
生成 され て いま す (ここ で 使用 し た APL 記号 の 代用 表示 に つい て は 後述 ). 

現在 の ディ スク 上 に は , APL ヽ N80 の パッ ケー ジ の 中 か ら , 必要 な ファ イル だ け と , で き 上 っ た "SAMPLE? 
プロ グラ ム が セー プ さ れ て いま す の で , それ ら を STAT コマ ンド で タイ プア ウト し て み ま し ょ う . 


A>BaSTAT *。 ま / 


Recs Bytes Ext cc 
284 さ 6k さ R/M AsAPL.COM APL イ ンタ ー プ リタ . 


2 さ さ k 1 R/M aaETCFNS。 APL …-- 各種 関 数 の ライ ブラ リ .*SAMPLE* プ ログ ラム に は 秘 要 な し . 


6 1k 1 R/M AsSBAMPLE 。 APL で き 上 っ つ だ *SAMPLE* プ ログ ラム 、. 
Bytes Remaining ロ n As 201k 


人 > 


Figure-5.11.4 ディ スク 上 に 現在 セー プ さ れ て いる ファ イル . 
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で は この 後 , も う 一 度 最初 か ら ,、 ディ スク に セー ブ プ さ れ て いる "SAMPLE" プロ グラ ム を ロー ド し 
て 実行 し て み ま す . その 後 , 各種 関数 の ライ プラ リ ・ フ ァイル を ロー ド し て , 2 3 の 関数 で 遊ん で 
ま し よう 。 


各種 高級 言語 に よる 同一 主題 ソフ ト 開 発 倒 


[$DL HISTOD [$QGD] $DLI 
$DL  Z_SYNM HISTOD ソ 
Li} を 


E2] " Z_(" "。SYM)[1+(WRT $IO $HX /V)@NL 。@LE 3 だ つ だ 1 行 で 上 記 の 機能 が 書け る . APL は スゴ イ / 
DL 
ソー ト (SORT) の 内 容 を ツイ プア ウト せよ . 


- ヒ スト グラ ム (HISTO) の プロ グラ ム を タイ プア ウト せよ . 


($DL SORT 上 *$QD] $DL| 
*DL ORD_SDRT UNSjMHICH 
E1] ORD_wino 


[2] LBi$GO O&$1O O=eRO UNB 
[上 さ ] 。MHICH_UNS=$MN /UNS 
4] ORD_DRD。MHICH/UNS : SORT の プロ グラ ム . 
[S] UNS_(WTL MHICH) /UNS 
te] BOD LB 
…- 大 き さ が 20 の パス カル の 三角 形 を ツイ プア ウト せよ . 
1 
2 1 
ささ 1 
4 6 4 1 
S 1O 10 5 1 
6 15 20 15 6 1 
7 21 35 35 21 7 1 
B 28 Se 70 56 2881 
9 36 B4 126 126 8B4 さら 6 9 1 


4 
10 45 120 210 252 210 120 45 10 1 
11 55 165 ささ O 462 462 ささ O 165 SS5 11 1 
66 22O 495 フウ 2 924 フ 92 495 220 66 12 1 
1 さ 78 286 715 1287 1716 1716 1287 715 286 7B 1 さ 1 
14 91 さ 64 1OO1 2002 さ OO さ さ 4 さ 2 さ OO さ 2OO2 1OO1 さ 64 91 14 1 
15 1O5 455 1 さ 65 さ OO さ SOOS 64 さ 5 64 さ 5 5OO5 さ OO さ 1 さ 65 455 1O5 15 1 
16 12O S6O 182O 4 さ 6B BOOB 1144O 1287O 1144O BOOB 4 さ 68B 182O 56O 120 16 1 
17 1 さ 6 6BO 2 さ B ヨ O 61 ヨ 8 12 さ 76 19448 24 さ 10 24 さ 1O 19448 12 さ 76 6188B 2 さ BO 68O 136 17 1 
18 15 さ B16 さ O6O BS568 18564 さ 1824 4 さ 75B 4B62O 4 さ 758B さ 1B24 18S64 BS68 さ O6O 16 15 さ 18 1 
19 171 969 さ B76 11628 271 さ 2 503 さ BB 7558B2 92 さ 7 92 さ 7B 755B2 50SB8B 271 さ 2 11628 さ B76 969 171 19 1 


こら こと に ビ と ロロ と ビニ と と ヒー ビニ ーー ニーー ビ ーー ビー ビー 


[$DL PASCAL 〔$gD] $DL] その プロ グラ ム を タイ プア ウト せよ . 


則 


に ! リ バス カル (PASCAL) の プロ ブラム. だ つ だ ご これだけ / 
E さ ] *$GBD _ PRINT&N$GE $ROD P_(O。P)+P。O 
ま DL 
UEOEEJ 遊び は や め て CPM に 戻れ . 


A> ( 注 : CRT や , プリ ンタ へ の 出力 は , 1 行 の 字数 が 多い と , 次 の 行 に 続い て 表示 され ます .) 


Figure-5.11.5 APLN80 で ちょ っ と 遊び を . 


Figure-5.11.3 や Figure-5.11.5 で 使わ れ た APL 記号 の 代用 ASCII 表示 は , 実際 は 次 の 記号 に 当 
た り ま す . 


Figure-5.11.6 “SAMPLE” プ ロ グラ ム の 作成 に 使わ れ た APL 記 号 の 代用 ASCII 表 記 
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簡易 言語 (プロ プラ ムレ ス 言 語 ) の 使用 例 


6.1 簡易 言語 (プロ グラ ムレ ス 言 語 ) の 使用 例 


VISICALC (Visi Corp 社 ) に 端 を 発し た , “簡易 言語 "と 呼ば れ て いる 汎用 ビジ ネス ・ ソ フト ウェ 
ア は , その 質 ・ 内 容 ・ 種 類 と も 大 き な 進 展 を 見 せ て お り , 現時 点 で は , “Multiplan"” (マイ クロ ソフ ト 
社 )、 “SuperCalc” (ソー シム 社 ) な ど が , 質 ・ 内 容 と も に 代表 的 な も の に な っ て いま す . 

筆者 は , 米国 製 の 、 この 2 種類 の ソフ ト を 実際 に 使っ て みて , 日 米 間 の ソフ トウ ェ ア ・ ギ ャ ッ プ , 
正 に ここ に あり ! と いう 強い 印象 を 受け ,、 この こと を 「 実 習 CPZM」 の 冒頭 に も 書き まし た . 

日 本 で も , この 種 の ソフ ト は 雨後 の 竹の子 の よう に た くさ ん の 種類 が 発売 され , 中 に は , 大 々 的 に 
宣伝 きま れ て いる も の も あり ます . し か し , その ほとん ど は , 特定 の パー ソナ ル ・ コ ンピュータ 専用 の 
も の で , プロ グラ ム も , その 機種 に 組み 込ま れ て いる BASIC の イン ター プリ タ で , た だ ズラ ズラ と 
書か れ て いる も の ば か り で スピ ー ド も 遅く (マシ ン 語 を プロ グラ ム の 一 部 に 使っ て いる も の も ある が ), 
内 容 , 使い 易 さ な ど , 先 の 2 つの 米国 製 ソ フト に 比べ あま り に も 幼い , と いう の が 実感 で す . 

CPM 上 で 走る 優秀 な ソフ ト が ある こと を 知ら ず , これ ら の 貧弱 な ソフ ト が , パソ コン の 能力 の 限 
界 で ある な ど と 誤解 する 人 も いる の で は な いか と 心配 で す . 


それ で は , この 種 の ソフ ト の 中 で , 米国 で ベス ト セ ラー の 1 つと 言わ れ て いる , ソー シム 社 の SuperCalc 
を 取り 上 げ て , その 合用 例 を 紹介 し まし ょ う . し か し , その すべ て を 紹介 する 訳 に は 行き ませ ん . 例 
に よっ て , すべ て を 紹介 する に は , SuperCalc 用 の 本 を 一 冊 書 か な く て は な ら な いで し ょ う . よっ て , 
ここ で 例題 と し た も の は , 機能 の 一 部 , 使い 方 の 一 例 で ある に 過ぎ ませ ん . 


6.1.1 SuperCalc の 概念 


- VISICALC, Multiplan, SuperCalc な どの 汎用 ビジ ネス ・ ソ フト の 概念 は . どれ も ほぼ 同じ で あり , 
* ワ ー ク シー ト ” と 呼ば れる “電子 の 紙 "?( コ ンピュータ の メモ リ の デー タ ・ エ リア に 当たる ) を SuperCalc 
で は , 横 63 メ 縦 254 の 計 16,002 個 の “セル” に 区 切り 。 その “セル” に , 項目 や 数 値 な ど を 書き 込み , 
"電子 の 紙 ” を “ 表 と し て 用 い , 縦 ・ 横 の 計算 (各種 関数 も 含む ) な ど を 行わ せる も の で す . 1 つ 
の 表 の 中 で の デー タ の プ ブロック 移動 や , 他 の 場所 へ の コピ ー, 他 の 表 か ら の デー タ の 取り 込み な ども 
自由 に 行え ます . 

Figure-6.1.2 の 表 が , その 電子 の 紙 ” の 実際 で あり , SuperCalc を 起動 し た 状態 で は , 表 全 体 の 
左上 に 当る "ディ スプ レイ ・ ウ ィ ン ド ウ ” が , スク リー ン に 表示 され て いま す . 

表 の 上 の 位置 の 呼び 方 は , 横 方 向 に "カラ ム (Column) A, B, C……"” 縦 方 向 に “ロー (Row) 
1。。 2 3 や em ? と 表現 し ます . それ ぞ れ の “セル” は カラ ム と ロー の 変 点 に 当たり , この 図 に 示さ 
れ て いる セル は , “E10′ の セル と いう こと に な り ま す . 
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この 図 の 。 セ ル “A1”" の“ く > 記号 (コン ピュ ー タ に よっ て は , この 部 分 の 表示 が 反転 し た り 。 
色 が 付い て いた りす る ) は 、 "アク ティブ プ ・ セ ル "” を 示す 記号 で あり ,、 ワー クシ ー ト へ の デー タ の 入力 
や 、 書き 替え な ど は , この "アクティブ プ ・ セ ル ? を 通し て 行わ れ ま す . 
6.1.2 SuperCalc の 使用 例 


で は , SuperCalc を 起動 し て , 実際 に 簡単 な 表 を 作っ て み ま し ょ う . NEC の PC-8801 上 で , NEC 
の CPM を 使っ て 実行 し て み ま す . 
SuperCalc の 起動 は 


A>SCJ 


で 行わ れれ ます 。 そ の 。 オープニング ・ メ ッ セ ー ジ を 決 に 示し ます , 


A>SC ) SuperOalc を 起動 する . 


SuperCa1cC (tm) 
Version 1.O6 
Terminal1i Soroc 12O 
CPUi BOBO 
S/N- OOQOOOO 。Sys 2.x 


Copyright 19 昌 1 


SURCINM CORP- 
Banta。 Clara。 ヒビ A。 


Enter "? つ " for HELP or "return" モロ 5 も ar も 。 5 


SCREEN COPY |[DIR aa ][ "TAB |][ RuBour 
NEC の CPM の ファ ン フ ショ ン ・ キ ー の メニ ュー. 


Figure-6.1.1 SuperCalc の 起動 と 。 その オー プ ニ ン グ ・ メ ッ セ ー ジ . 


さっ そく “RETURN” を キー イン し て , プロ グラ ム を スタ ー ト させ ます . 

プロ グラ ム が スタ ー ト する と 。 スク リー ン に は , Figure-6.1.2 の 左上 方 に 示さ れ て いる “ディ スプ 
レイ ・ ウ ィ ン ド ウ ” の 部 分 が 表示 され ます . この 部 分 は , 図 で も 分 か る よう に , ワー クシ ー ト 全体 の , 
ほん の 一 部 分 で あり , ユー ザー は , 大 き な ワ ー ク シー ト の 任意 の 場所 を ,. この ディ スプ レイ ・ ウ ィ ン 
ドウ を 上 下 左右 に 移動 する こと に より , 見 る こと が で きる 訳 で す . 
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ジーーーー ! 動員 日 交 日 陣 | 


の チャ プ ブル 
任意 の 位置 に 移動 する . ) 


( 南 ) ぼ ーー 


lidthi 9 Neweryi24 Last Col/Rowi 人 1 ? fer EEP 


) 
Nm | 交 ]| mm ] 


ディ スプ レイ ・ ウ ィ ン ド ウ 


NEC の CP プ M の ファ ン フ ショ ン ・ キ ー スク リーン 1 画面 分 の 
の メニ ユー. SuperCalc と は 直接 関係 表示 エリ ア . 任意 の 位 
な し . 置 に 移動 する . 


2311 ABK(63 個 ) 

282| 

23| Si 

2541 ーー ュー ュー 


Figure-6.1.2 SuperCalc の ワー クシ ー ト と ディ スプ レイ ・ ウ ィ ン ド ウ 
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次 の 表 は , 簡単 な 作 表 を 行っ て いる 途中 の 状態 を 示し た も の で す . 


E 音信 


SuperCalc Sample Program for CP/M Learning System 音 さ 
さ ! 
41 ハ * ラメ ー タ QA (PA) = (HEI+MA) /2 だ だ の 足し 算 と 割り 算 0 
5!i J* ラメ ー タ B (PB) = SIN(HI) x ATAN(MA) - サ イツ と アー ク .⑦ ン ジェ ツ ト ( 単 人 は ラジ アツ ) 
6! 中 * ラメ ー タ ビ (PC) = EXP (HI/10O) +LOGe (MA) +BQROOT (HI+MA) ーー e と 自然 対数 
7! コウ ケイ (SUM) = PA+PB+PC だ だ の 足し 算 . 7 
1! ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ーーーーーーーーーーーーーーーーーーーーーーーーーー| 
911 コウ モ フ |! シン チョ ウ タイ シュ ウ 1 "ラメ ー タ 人 Q “ラメ ー タ BN* ラメ ー タ ビー コ " ウ ケイ 1 
101! ナマ エ 1 (HI) (MA) 1 (PA) (PB) (PC〉 (SUM) 1 
111 1 ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニー ニニ ニニ ニー ニニ ニニ ニニ ニー ニー ニー ニー ニー ニニ ニニ ニニ = ニニ W 
1211 イセ リ アキ ノ フ * | 17 さ 。6 67 9 1 く 12O。75 > 一 1.12962 25.4 さ 291 145.O5 さ さ 1 
1 さ ! | カタ ラキ ^" リ アキ ラ ! 171.4 66。4 I 3 人 0 
14!! カワ 2 ョ pbE ロ | 172.7 65.9 アフ ティ ブ ・ セ ル 
31S11 コウ ケイ コ 161。6 50。 1 


1711 フカ カワ スス ム 
1 日 11 ムラ や ヤス ハル 


1911 コー テーーーー ニ ーー ニー 


! 

1 H 

1 I 
161| ヒュ ウ カ " ヒサ 9 エ 1 160。5 48.8 1! 

! H 

! 1 


! 

4 

2 
| 
1 

1 


ー E12 Form=(B12+C12) /2 ジフ ティ ブ ・ セル の 計算 式 (フォ ー ミ ュ ラ ) が 表示 され て いる 、 
To? (Enter Range) 。 then Returng or "。" for ロ ptionsm 
2 く >/Rep1 iCa モ em。E12E1SiE1B 次 に 実行 し よう と する レプ リ ケ ー ト ・ コマ ンド の ライ ン . セル EY2 

セル E 和 8 


Figure-6.1.3 作 表 の 途中 の SuperCalc. 


ロー 1 一 7 は, この 表 の タイ トル と , 表 の 中 で 使わ れ て いる パラ メー タ の 説明 文 が 書か れ て お り , 
ロー 8 -19、 カ ラム A~I の 範囲 が 1 つの 表 に な っ て いま す . 

デフ ォ ー ル ト の 各 カ ラム の 幅 は 9 文字 で す が , この 表 で は カラ ム A が 広げ られ , カラ ム D と 1 が 狼 
ぬれ で ゅ ます 、 た だ し 。 この 幅 は スグ ク グリー シン や プリ シ み 上 の こと で あり , デー とし て は 。 ど の もせ 
ル に も 最大 116 文 字 を 入力 する こと が で きま す . 

表 に は , 実在 の 人 物 の 氏名 と で た ら め の 身長 ・ 体 重 の 値 が 記入 きれ て お り , その 右側 に は , 意味 の 
な い パ ラメ ー タ AB C と , その 合計 の 項目 が あり ます . 各 パ ラメ ー タ が , どの よう な 計算 式 に よ 
り 求め られ る か は , ロー 4 7 に 書か れ て いま す . それ ら の 計算 式 (フォ ー ミ ュ ラ ) は , すでに 「 イ 
セリ アキ ノブ 」 の 行 の み に 書 き 込 まれ て お り , その 計算 結果 が 表示 され て いま す . パ ラメ ー タ A (PA) 
の 実際 の フォ ー ミ ュ ラ を , 表 の すぐ 下 に 見 る こと が で きま す . 

「 カ タ ギ リ アキ ラ 」 以 後 は 。 デー タ の み が 記 入 さ れ て いる だ け で 。 フォ ー ミ ュ ラ は 記入 され て お ら 
ず , その 計算 結果 は 白紙 の まま と な っ て いま す . 

で は , パラメータ A の カラ ム を 全部 埋め て み ま し ょ う . 
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前 具 の 表 の 下部 に は , その コマ ンド ・ ラ イン が すでに 書か れ て いま す . 


グ Replicate, …… 複写 する . 
E12, E13 : E18…… セル E12 の フォ ー ミ ュ ラ を セル E13ーE18 に レプ ブリ ケー ト す る . 


と いう 意味 の コマ ンド ・ ラ イン で す . 
どう な る か ,。 リタ ン を キー イン し て 実行 し て み ま し ょ う . 


| 仙 還 ] B 1 1 の EDII E 1 F 1 11 H 2 
11 1 


21 SuperCalc Bample Program for CP/M Learning Bystem 共 さ 


41 "ラメ ー タ 人 (PA) = (HI+MA) /2 

に 】| "ラメ ー タ B (PB) = SIN(HI) x QATAN(MA) 

に | ハ ? ラメ ー ダ タビ (PC) = EXP(HI/10O) +LOBe (MA) +BQRUODT (H エ +MA ) 

7! コウ ケイ (BUM) = PQ+PB+PC 

日 1 一 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ー! 

911 コウ モウ | シン チョ ウ タイ シー ュ ウ 1 。 "ラメ ー タ AA "ラメ ー タ B “ラメ ー タ ビ 、 コ "ウケ イ 2 

1O11 ナマ エ 1 (HI) (MA) 1 (PA) (PB) (PC〉 (SUN) 1 

1 1 | | ニニ = ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ エー ニニ エニ エニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニー | _- 

1211 イセ リ アキ ノ フ " | 17 さ 。6 67。9 120。75 。 -1.12962 25.4 さ 291 145.05 さ さ ! 
1 171.4 66。 4 11 昌 9 LN 
1 172。Z 65.9 119. さ 1 

1511 コウ ケイ コ 1 161。6 SO・. 1 10S。85 | セル E12 の フォ ー ミ ュ ラ と , 栓 XN893 に 同じ フォ ー! 
! 
H 


16| | ヒュ ウ カ " ヒサ エ 160.5 4 日 104。65 | ミコ ラガ レプ リ ケ ー ト され , 結果 が 表示 され だ .t 
1711 フル カワ スス ム 175。 フ 72. さ 124 ! 
1811 ムラ で ヤス ルル 1! 175。2 70.2 1 く 122。7 


>*ー アフ ティ ブ ・ セ ル 1 


19⑦1 1 一 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ニ ニー ニー ニー ニー ニー ニー ニー ニー 


_v E18 Form=(B18+C1 昌 ) /2 アフ ティ ブ ・ セ ル の フォ ー ミ ユラ . Figure-6.1. 3 の フォ ー ミ ュ ラ と 所 する さと 、 
Midth』 9 Memoryi21 Last Co1/Rowi 19 ? for HELP 


1> 
Cp Lock On | [SCREEN COPY|IDiR ar || Tam | RUEQUT 


Figure-6.1.4 レプ リ ケ ー ト ・ コ マン ド の 実行. 
この よう に , セル E13-E18 が すべ て 計算 され , 結果 が 表示 され まし た . つま り , セル E12 の フォ 
ー ミ ュ ラ が , これ ら の セル に 相対 アド レス で レプ ブリ ケ ー ト され た の で す . セル E18 の フォ ー ミ ュ ラ が , 


スク リー ン の 下部 に 表示 され て いま す の で , Figure-6.1.3 の も の と 比較 し て 下さ い . 


同様 に .「 イ セリ アキ ノブ 」 の 行 の 。 す で に 書き 込ま れ て いる 各 パ ラメ ー タ の フォ ー ミ ュ ラ を レプ 
リ ケ ー ト し て , 完成 させ た 表 を 次 に 示し ます . 
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織 1 に ] 1 B 11 に EDEI E 1 1 生 1 に ] 11 H 1IEI 
1! 


2! SuperCalc Sample Progrram for CP/NM Learning System 基 さ 

3! 

4 ! ハ " ラメ ー タ (PA) = (HI+MA) /2 

5! ハ * ラメ ー タ B (PB) = SIN(HI) x ATAN(MA) 

6! バハ * ラメ ー タ ラビ (PC) = EXP(HI/10O) +LOGe (WMA) +SQRUUT (H エ +MA ) 

7! コウ ケイ (SUM) = PA+PB+PC 

豊 4 1ーーーーーーーーー ニ ーーーーーーー ニ ーーーーーー ニ ーーーーーーーーーー ニ ーー ニー ニーーー-ー ビ ーー I 

911 コウ モブ |! シン チョ ウ ライ シド ュ ウ 1 - "ラメ ー ク 内 0W* ラー クラ B 0 ラ メー タロ コミ ウイ 1 
101! ナマ エ 1 (HI) (MA) 1 (PA) (PB) (PC) (SUN) 1 
1 1 | | == ニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ mmp=mpemmmmmmemmmmm ニ ニニ ニニ ニー ニニ = ニ デ ニー | 
1211 イセ リ アキ ノ フ " 1 17 さ 。6 67 9 1 120.75 ー1 . 12962 25.4 さ 291 145.05 さ くさ 1 
1 さ ! | カカ タキ" リ アキ ラ ! 171.4 66. 4 1 11 日. 1 .52970 さ 25. 18992 145.61961 
141! カワ フラ ヨシ ヒロ  ! 172. フ 65. 1 119. さ ・ 1 さ 60921 25。28848 144.72461 
15! 1 コ デ ウ ケイ コ 1 161.6 SO. 1 H 105. 日 5 ー1 . 522 さ 4 2 さ .BOO コ 7 12 ピ 8 . 1 28S! 
161! ヒュ ウ カ " ヒサ エ 1! 16O.5 4 日 日 ! 1O4.65 ー・4266 ら 10 2 さ 。 ら 66 さ 1O 127.B8B65 1! 
1711 フル カワ スス ム  ! 175.Z 72. さ 1 124 ー・ さ 5 さ 72 さ 25。76108 149.40741 
1811 ムラ で 和 ヤス) ルル | 175.2 70. 2 生生 セッ 7。 ー1 . 03708 く 25。 6494> 147. さ 12 さ 1 
1911ーーーーー ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 1 
201 

く B18 Form=EXP(B18/100) +LNC12+SQRT (B18+C18) パラ メー タ C の セル G18 の フォ ー ミ ュ ラ . 
Midth: 9 Memoryik21 し Las も Co1/Rows 119 ? for HELP 


1 > 
Es [Romaur ] 


Figure-6.1.5 完成 し た 表 . 


この よう に , 1 項目 1 つの 計算 式 を 書け ば , あと は 非常 に 楽に 表 を 完成 する こと が で きま す . 
計算 結果 の 数 値 で は な く 、 フォ ー ミ ュ ラ 自身 を 表示 させ た い 場 合 は .、 コマ ンド に より 決 の よう に 表 
示さ れ ま す . 各 セ ル は 、 現在 . デフ ォ ー ル ト の 9 文字 に 表示 が 制限 され て いま す の で , 式 の 一 部 し か 
見 えて いま せん (表示 字数 の 変更 は 自由 に 行え る ). 


思 H 人 選 ] B 11 の IDII E 1 記 1 8 11 H EEE 
11 
21 SuperCa1c Sample Program fo ヒ P/MN Learning お ys モ em 音 さ 
さ ! 
41 JJ" ラメ ー タ QA (PA) = (HI+MA) /2 
51 ハ * ラメ ー タ B (PB) = BIN(HI) x QATQN(MAQ) 
6! バハ * ラメ ー タ C (PC) = EXP(HI/100) +LDGe (MA) +SBQRDOT (HI+MA) - 
7! コウ ケイ (SUM) = PA+PB+PC 4 
日 1!! ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー 一 1 
11 コウ モウ ! シッ チョ ウ ライ シュ ウ 1 。 "ラメ ー ク 人 A。 "ラメ ー タ B ハ * ラ メータ ビビ コ " ウ ケイ 1 
10!! ナマ エ 1 (Hi) (MA) 1 (PA) (PB) (PC) (SUM) 1! 
1 1 | | ニニ ニニ ニニ ニニ ニニ ニニ ニニ ニニ = ニ =eecompppemnmnmmmmmmrmmmmmmarmmmmmmnemm ニ = ニー 
1211 イセ リ アキ ノ フ " |! 17 さ 。6 67。9 1  (B12+C12 SIN(B12) EXP(B12/ SUM(E12+1 
1 さ ! |! カク タキ" リ アキ ラ |! 171.4 66. 4 1  (B1 さ + ビ 1 さ SBIN(B1 さ ) EXP(B1 さ / SUM(E1 さ +!| 
141! カカ 22 ヨシ ヒロ | 172.7 65.9 1  (B14+C14 BIN(B14) EXP(B14/ SUN(E14+| 
1511 コ " ウ ケイ コ 1 161。6 50O. 1 1  (B15+C15 SBIN(B15) EXP(B15/ SUM(E15+! 
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161 1! ヒュウ カ " ヒサ エ | 160.5 4 昌 . 晶 1 (B16+C16 SBIN(B16) EXP(B16/ SUN(E16+1 
1 プ 71 1 フル カワ スス ム  ! 175。 フ フ 72。 さ # (B1 フ + ビ 17 BIN(B17)〉) EXP(B17/ SUM(E1 フ + ォ ! 
1 日 1| ムラ セ ヤス ハル  ! 175.2 7O.2 H (B18+ ビ 1 昌 BIN(B1 昌 ) EXP(B1 日 / SUM(E1 昌 +! 
1⑦1 1 一 ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー! 
201 それ ぞ れ の フォ ー ミ ユラ が 表示 され て いる . し 
v H2QO 
Midthi 9 Memoryi21 Laswt Co1 /Rowi 119 ? for HELP 
1> 
ee・ SCREEN COPY の 
Figure-6.1.6 数 値 の 代わ り に 、 その フォ ー ミ ュ ラ を 表示 させ た も の . 


表 が すべ て 完成 し プリ ンタ ヘタ イプ アウ ト し た 結果 を 示し ます . ロー, カラ ム の 表示 は , 付け た り 
取っ た り 自 由 で す . 


guperCaic Saapte Progras tor CPZ Leerntng 5ywtee m ェ 


5oRooT (hiro) 


の  @  @ 。 @  @  @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ @ 


Figure-6.1.7 タイ プア ウト され た 完成 し た 表 . 


以上 紹介 し た の は , SuperCalc の 使い 方 の ご く 〈 基本 的 な 簡単 な 例 に すぎ ませ ん . まだ まだ 目 を 見 張 
る よう な 実に 多く の 機能 を 有 し て いる こと を , お 断り し て お きま す . 

さら に SuperCalc に は , メニ ュー・ シ ステ ム が 完備 され て いて , 使い 方 や 、 それ ぞ れ の コマ ンド が 
分 か ら な い 場 合 に は , ~ ? ? 記号 を キー イン する こと に より , その 場 で 必要 な コマ ンド ・ メ ニュ ー や , 
コメ ント を いつ で も 表示 する こと が で きま す . この メニ ュー・ シ ステ ム は ツリ ー 構 造 に な っ て いて , 


293 


CPM の アプ リケーション いろ いろ 


現在 入力 され て いる コマ ンド に 従っ て , 全般 の メニ ュー 細部 の メニ ュー と いう 具合 に , その 場合 に 
応じ て 必要 な も の が 自動 的 に 出力 され ます . この 辺 の 動き は 実に スマ ー ト で あり , 日 本 の ソフ トウ ェ 
ア ・ ハ ウス も よく 研究 し て も らい た い 点 で す . 


6 .2 スク リー ン ・ エ ディタ の 使用 例 


CPM に 付属 し て いる エディ タ (ED . COM) は , 十分 に 強力 で あり , アセ ンプ ラ や 各種 言語 の ソ 
ー ス ・ フ ァイル の 作成 に 広く 使わ れ て いま す . ED は 強力 で は あり ます が , それ を 自由 自在 に 使い こ な 
す に は , か な り の 熟練 を 必要 と し ます . 筆者 も , 自在 に 使え を る よう に な る まで は , 恐 ら 〈 1 年 ぐら い 
は か か っ た よう な 気 が し ます . 

自在 に 使い こなせ る よう に な る と , ED の 強力 さ は , 一 般 の パー ソナ ル ・ コ ンピュータ に 組み 込み の 
BASIC が 持っ て いる エディ タ (その ほとん ど が スク リー ン ・ エ ディ タ ) と は 格段 の 差 が だ ある こと が よ 
く 分 か る よう に を り ま す . ' 


一 般 の BASIC が 持っ て いる スク リー ン ・ エ ディ タ は , 非常 に 使い 易く , 小さ な プロ グラ ム の 開発 
に は 大 変 便利 で す が , 大 き な プ ログ ラム の エディ タ と し て は , 機能 不足 で 使い も の に な ら な いと 言っ 
て も 過言 で は あり ませ ん . 致命 的 な 不足 機能 の 主 な も の は , テキ スト 全体 に 対す る グロ ー バ ル な 文字 
列 サ ー チ と 文字 列 の 置き 奉 え で す (ED の コマ ンド の "ME……?。 MS……? や "nmnN……? に 当たる ). 

そこ で , 使い や すい スク リー ン ・ エ ディ タ で あり , か つ , テキ スト 全体 を グロ ー バ ル に エディ ト 可 
能 な エディ タ が 望ま れる こと に な り ま す . 


6.2.1 Micro Pro 社 の Word Master 


スク リー ン ・ エ ディ タ は , 数 社 か ら 発売 され て いま す が , その 代表 的 な も の は , ここ で 取り 上 げ る 
Micro Pro 社 の Word Master で す . Micro Pro 社 は , 有名 な 英文 ワー ド ・ プ ロモ セッ サ の Word 
Star” で 広く 知ら れ て いる ソフ トウ ェ ア ・ メ ー カ ー で あり , エディ タ で ある この Word Master も , 
CPM 上 の スク リー ン ・ エ ディ タ の 代名詞 に な っ て いる で ぐらい に 広く 使わ れ て いる エディ タ で す ., 


Word Master は , 誰 で も すぐ 使え る 便利 な スク リー ン ・ エ ディ タ と テキ スト 全体 を グロ ー バ ル に エ 
ディ ト す る 機能 を 合わ せ 持 っ て お り , その た め に , 2 つの エディ ト ・ モ ー ド を 備え て いま す . 


@ VIDEO モー ド 
@ COMMAND モー ド 


の 2 つ で あり , VIDEO モー ド が スク リー ン ・ エ ディ タ の モー ド で あぁ あり, COMMAND モー ド が , CP ン 
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M に 付属 の ED と 。 だ いた い コ マン ド ・ コ ン パ チ ブ ル な ポイ ンタ 形式 の エディ タ の モー ド で , グロ ー 
バル な エディ ッ ト が 可能 で す . エディ ッ ト 作 業 は , この 2 つの モー ド を . 場合 に 応じ て 切り 圧 え な が ら 
進め て 行く 訳 で す . モー ド 切 り 替 え は 簡単 で あり , VIDEO モー ド か ら COMMAND モー ド へ は "ESC* 
キー の 入力 , その 逆 は "V』” の キー 入力 に より 瞬時 に 切り 替わり ます . 


6.2.2 Word Master の 実行 例 


実際 に Word Master を 起動 し て , CPM に 付属 し て いる DUMP プロ グラ ム の ソー ス ・ フ ァ イ 
ル “DUMP . ASM" を エディ ッ ト し て み ま し ょ う . CPM マシ ン に は , PC-8801 を 使い 、NEC の 
CP ン M を 走ら せ て いま す . 以下 の リス ト は , その SCREEN COPY の 機能 に より タイ プア ウト し た 
も の で す . 


Word Master を 実行 する に は , 2 つの ファ イル , 


WM . COM 
WM . HLP (ヘル プ ・ メ ニュ ー の 表示 を し な けれ ば , これ は 必要 な い ) 


が 必要 で す . 
Word Master が ドラ イブ A:,。 “DUMP . ASM”" が ドラ イブ B: 上 に ある と し て , Word Master を 
起動 し ます . その 様子 と , 起動 直後 .、 ほん の わずか の 間 表 示さ れる 製品 メッ セー ジ を 次 に 示し ます . 


A>MM BsDUHP.ASH) ドラ イブ B : 上 に ある , DUMP プ ログ ラム の ソー ス ・ 『 プ イル に 対し て , ワ ー ド マス を 起動 

MicroPrG MORDHASTER release 1.07A serial % MM25108V 1 て す 

COPYRTGHT (C) 197B MICRUPRD INTERNATI ロ NAL CORPORATION | この メッ セ 
ア さ れ の 画面 と な る . 


Cp Lock On | [SCREEN COPY][DIR Ar | RUBOUT 


Figure-6.2.1 Word Master の 起動 と オー プ ニ ン グ ・ メ ッ セ ー ジ . 


ほん の 少し の 間 , 上 の メッ セー ジ が 現れ , その 後 す ぐに 画面 の オー ル ・ ク リア が 行わ れ ,、 テキ スト 
で ある “DUMP . ASM” の 最初 の 1 ペー ジ が 表示 され ます . 

その 状態 を 次 に 示し ます . これ は 自動 的 に 行わ れ , ED の よう に , アペンド の コマ ンド を 実行 する 必 
要 は あり ませ ん . 以後 も , アペンド や セー ブ は 自動 的 に 行わ れる の で , ED の A コ マン ド や W コ マン ド 
に 相当 する も の は 全く 必要 あり ませ ん . 
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ん 人 巨 動 し だ 直後 の カー ソル の 位置 


田 | FILE DUNP PRKDGRAW。 READS AN INPUT FILE QAND PRINTS IN HEX 
日 
5 CUPYRIGBHT ( ビ ) 1975。 1976。 1977。 1978 
DIGITAL RESEARCH 
は 画面 全体 が フリ ア さ れ て , この よう に エディ ッ ツ 
8 BDX 579。 PACIFIC BROVE これ る テキ スト の 最初 の 1 ページ が 表示 され 
5 CALIFHRNIA。 9 さ 95O る . カー ソル は 左上 端 に ある . 
日 
ロ RG 1OOH 
BDnS  Egu OOoO5H  』DOS ENTRY POINT 
CONS EQU 1 #READ CONSOLE 
TYPEF EQU ビィ #TYPE FUNCTION 
PRINTF EQGU 人 s BUFFER PRINT ENTRY 
BRKF EQU 11 BREAK KEY FUNCTIDN (TRUE IF CHAR READY) 
nPENF EQU 15 sFILE nPEN 
READF EQ ロ U 2Q sREAD FUNCTION 
け 
FCB EQU SCH #gFILE CONTRODL BLOCK ADDRESS 
BUFF EQU BoOH 5 INPUT DISK BUFFER ADDRESS 
H 
5 NODN GRAPHIC CHARACTERS 
CR EQU ODH 3 CARRIAGE RETURN 
L し F EQU OAH 3$sLINE FEED 


Figure-6.2.2 WM が 起動 し て 、 テ キス ト の 1 ペー ジ 目 が 表示 され た と ころ . 


この 後 、 2 3 の 簡単 な エディ ッ ト を 実行 し て み ま す が , その 前 に , どの よう な コマ ンド が ある の 
か を 。 ヘ ルプ ・ メ ニュ ー で 見 て お きま し ょ う . 

Word Master の ヘル プ ・ メ ニュ ー は , いつ どん な 時 で も Ctrl-J を キー イン する こと に より 表示 させ 
る こと が で きま す . 

Ctrl-]」 を キー イン する と , まず 次 の コマ ンド ・ メ ニュ ー が 表示 され ます . 


-VIDEU MODE SUMMARY (TYPE ^J FUR _ NEXT FRAME) 


INSERTIHN UN/ ロ FF RUB DELETE CHR LEFT 

CURSUR LEFT CHAR ^G DELETE CHR RIGHT 
CURSUR RIBHT CHAR ^ 学 DELETE MORD LEFT 
CURSODR LEFT MORD ^T 。 DELETE MORD RIGHT 


RIBHT MORD へ 日 。 DELETE に よ NE LEP で 
RIGHT TAB ^K DELETE LINE RIGHT 
UP LINE 会 党 DELETE MHDLE LINE 
DOMN LINE 3 1 PUT TAB IN FILE 
TOP/BUT (^HUME) ^N PUT CRLF IN FILE 
RIGHT/LEFT ^@ DO NEXT CHR 4X 
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へ MM FILE DOMN 1 LINE Ce NEXT CHR IN FILE 
2 い FILE UP 1 LINE es VI0 CONTROL 
へ R FILE DOMN SCREEN ESC EXIT VIDEO PODE 
^ 選 FILE UP SCREEN ^J DISPLAY THIS 


に いつ , どん な 時 で も Ctrl-J り を キー イン する こと に より , この コマ ンド ・ メ ニ 
0 。 

ご の メニ ュー は , ビデ オ ・ モ ー ド (スク リーン ・ エ ディ タ の モー ド ) の ペー ジ で あり , さら に Ctrl--J り を キー 
イン する こと に より , 次 ページ の メニ ユー が 表示 され る . 

Ctr-J り の も の を キー イン する と , 元 の 状態 の まま の テキ スト に 戻る こと が で きる . 


し [EE て で of] [CReEN copy RUBouT 


Figure-6.2.3 ヘル プ ・ メ ニュ ー の 最初 の ペー ジ . VIDEO モー ド の コマ ンド ・ メ ニュ ー. 


続い て 同じ く Ctrl-]」 を キー イン する と , 次 の ペー ジ の コマ ンド ・ メ ニュ ー が 表示 され ます . 


COMMAND MODE SUMMARY (TYPE ^J FOR NEXT FRAME ) 


MEANS + DR - QALLUMED HERE。 + QBSUMED IF ロ nMITTED 
MEANS CARRIQAGBE RETURN DR LINE FEED NECESSARY HERE 
MEANS ESC DR ^Z UnR CARRIAGE RETURN_ NECESSARY HERE 
MEANS Q_ NUMBER。 1 QASSUMED IF UMITTED。 # = 655 く 5 


+ー ロ ヒビ MOVE n CHARACTERS +ー-nD DELETE n CHARACTERS 
ォ ー ロ し MOVE n LINES キーn ロ K KILL(DELETE) n LINES 
+ーn ロ T TYPE n LINES nZ SLEEP n SECUNDS 

+ーnP NOVE 。 TYPE n PAGBES キー ロ 9 MOVE n LINES。 TYPE 1 


n Itex て を INSERT text n TIMES 

で ) ENTER INSERT MODE (ESC OR ^Z EXITS MODE) 

AO 。 nQtext ま (APPEND) DO 1L THEN JUST LIKE INSERT 

n く 。。・・ テ LOOP』 REPEAT ....。 n TIMES (DEFAULT = 655 さ 5) 


コマ ンド ・ メ ニ ユ ー の 2 ペー ジ 上 自 . コマ ンド ・ モ ー ド (ポイ ンタ 形式 の エディ ツ ・ モ ー ド ) の メニ ユー の 1 ペ 
4 さら に Ctr に り を キー イン する こと に より , あと 2 ペー ジ の コマ ンド ・ メ ニュ ユー を 表示 させ る こと が 


CE Lock Qff| [SCREEN COPY RUBQUT 


Figure-6.2.4 2 ペー ジ 目 . COMMAND モー ド の コマ ンド ・ メ ニュ ー. 


で は , 2 一 3 の 簡単 な エディ ッ ト 作 業 を 示し ます . 内 容 は リス ト 内 の 解説 文 を 参照 し て 下さ い . ま 
た , Figure-6.2.3 の コマ ンド ・ メ ニュ ー も 参照 し て 下さ い . 
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この 位置 か ら , Ctr-x を 4 回 キー イン する こと に より , カー ソル が 4 ライ ン 下 方 に 移動 、 1 
FILE DUMP _ PROGRAM。 READS AN INPUT FILE AND PRINTS IN HEX 


COPYRIGBHT ( じ ) 1975。 1976。 1977。 1978 
DIGITAL_ RESEARCH 


日 

5 

日 

盟 = この 位置 か ら , Ctri-N を 3 回 キー イン する こと に より , 3 ライ ン 分 の 空白 スバ ベース を ここ ご に 割り 込ま せ だ . 
3 ライ ン 分 の 空白 スペ ー ス 


3 BOX 579。 FACIF1IC BROVE 
H CALIFURNIA。 93950 
日 
ORG 1OOH 
BDOS EQU OOoO5H 3 DDS ENTRY POINT 
CONS EQU 1 3sREAD CONSOLE 
TYPEF EQU ピコ 3sTYPE FUNCT IDN 
PRINTF EQU L 3 BUFFER PRINT ENTRY 
BRKF EQU 11 3 BREAK KEY FUNCTIUN (TRUE IF CHQR READY) 
OPENF EQU 15 3sFILE OPEN 
READF EQU 20 5 READ FUNCTION 
U 
FCB EQU SCH 53FILE CUNTROL BLOCK ADDRESS 
BUFF EQU BOH 5INPUT DISK BUFFER ADDRESS 


Cp Lock Dff| [SCREEN COPY RUBOUT 


Figure-6.2.5 スク リー ン ・ エ ディ ッ ト 例 . 


5 FILE DUMP _ PROGRAN。 READS AN INPUT FILE AND PRINTS IN HEX 
5 

# COPYRIGBHT (C) 1975。 1976。 1977。 1978 

H DIGITAL RESEARCH 

し 1 MordMaster sample run- 
1 Ctr1 一 N = Insert 11ne。 
し 

H 

H 

H 


コン トロ ー ル ・ キ ャ ラク 以外 は , キー イン し だ も の は すべ て , その カー ソル 位置 に 
置か れる . Word Master は , 画面 表示 = テキ スト の 内 容 で ある . 


"PP11 こ ation CP/N"。 


Line 1n5ert sample † ロ レヒ 
BOX 579。 PACIFIC BROVE  \、。- 、 5 0 

3 ライ ン 分 の 空白 スペ ー ス に , 適当 に テキ スト を 書き 込ん だ . 
CALIFORNIA。 93950 各 ラ イン の 最後 に キヤ リッ ジ ・ リ マン の 入力 は いら な い . 


ORG 1OOH 

BpOS Eu ooosH  』DOS ENTRY PorNT 
CoNs 。 Eou 1 READ CONSQLE 
TyPEF EoUu 2 1TYPE FUNCTION 以下 は 。 オリ ジ ナ ル の テキ スト と 比較 し て 下さ い . 
PRINTF EoU 9 1 BUFFER PRINT ENTRY 
BRkF EoU in 1 BREAK トー この 填 ビ カー ソル を セン ト し て の trLK を キー イン する と BR 

NF pcdef ロ | 4 に , カ D 2 が 削除 
2 ef ご の 貞 に カー ソル を セッ ト し て 。 文字 を キー イン し て 行く と 。 

ラン 

#。。 ヾ FUNGTION* の *C^ の 位置 に カー ソル を セツ ト し て 。 RUBOUT を キー イン レ て 行く と , カー ソル の 同文 字 が 肖 除き れ て 行く. 
FCB EQU 5CH 3FILE CUN12 さ 45 く ROL BLOCK ADDRESB :RUBOUT を 3 回 キー イン し だ 例 . 
BUFF ” EQU BoH jrNPUT DIBK BUFFER ADDREBB 
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し Cp Lock Qff| [SCREEN COPY RUBOUT] 


Figure-6.2.6 スク リー ン ・ エ ディ ッ ト 例 . 


Word Master の スク リー ン に は , メモ リ 上 の エディ ッ ト ・ バ バッファ の 一 部 が 表示 され て お り ,、 スク 
リー ン 上 の 変更 は , すなわち , エディ ッ ト ・ バ パップ ファ の テキ スト の 変更 で ある 訳 で す . 

次 に VIDEO モー ド か ら , COMMAND モー ド に 切り 奪え て み ま し ょ う . “ESC” キー の 入力 と 同時 
に COMMAND モー ド に 切り 替 わり ます . 


QRG 1ooH 

BDQS EQU OOO5H  。』DOS ENTRY POINT 

CONS EQU 1 3 READ CONSOLE 

TYPEF EQU 2 TYPE FUNCTION 

PRINTF EQU ヶ BUFFER PRINT ENTRY 

BRKF EQU 11 3 BREAK 

OPENF - EQU 15 FILE abcdefg 

READF EQU 2o 3 READ CTION 

H 

rr EQU re Je SON BLOCK ee 


EQU INPUT DISK BUFFER ADDRE 
リー 22 に 画面 を 下端 に **" ガ 表示 され , Cd モー ド に 切り 府 わる ^ ネ "は コマ ンド ・ 
の の 現在 は スク ロー ル up さ れ , この 位置 


まま 10T)「 ヽ 

scr M の *ED ウト する . コマ ンド に 、 モ ー の 
# FILE DUMP PROSRAM。 READS A 的 FILE AND PTN HEX 
H 
1 COPYRIGBHT (C) 1975。 1976。 1977。 1978 
1 DIGITAL RESEARCH 10 ラ イン 分 が 
1 MordMaster sample run・ タイ プア ウト 
し 1 Ctr1 一 N = Insert 11ne。 され て いる . 
し 1 Line insert sample for "Application CP/M"。 
き BDX 579。 PACIFIC BROVE 
ま CAL IFURNIQ。 9 さ 3950 
『 
まき ー> コマ ンド ・ モ ー ド の プロ ンプ オ ・ モ ー ド に 戻る に は , ーー イン する 


[Cp_Lock Off] SREEN Copy Rh | | RuBoUT 


Figure-6.2.7 ESC キ ー の 入力 に より COMMAND モ ー ド に 切り 替わる . 


エディ ッ ト を 終了 する に は , ED と 同様 に E コ マン ド を 実行 し ます . 

Word Master は , この よう な 感じ で エディ ッ ト 作 業 を 行っ て いく 訳 で す が , スク リー ン ・ エ ディ ッ 
ト 時 に 多用 する カー ソル の 移動 と .。 スク リー ン の スク ロー ル に 関す る キー の 配列 を 示し て お きま す . 

決 の 図 の よう に , CTRL キー の 近く に ダイ アモ ンド 形 に 配列 きれ て いて 、 慣れ る と 大 変 具 合 が いい 
も の で す . 
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ドコ 
時 
上 


ビー 


は カー ソル を 1 ライ ン 上 に 移動 

は カー ソル を 1 字 右 に 移動 

は カー ソル を 1 単語 右 に 移動 

は テキ スト を 1 ライ ン 上 に スク ロー ル 

は テキ スト を 1 スク リー ン 分 上 に スク ロー ル を 示す 


の ゆ で ② き ! 6! こ っ 


Figure-6.2.8 カー ソル 移動 と スク ロー ル 関 係 の キー 
6.3 スク リー ン ・ オ リエ ン テ ッ ド な ソフ トウ ェ ア と ター ミナ ル の 適合 に つい て 


スク リー ン ・ エ ディ タ に 限ら ず 、 ワー ド ・ プ ロ セ ッ サ や , 6. 1 章 の 簡易 言語 な ど , スク リー ン 上 に 
表示 され た それ ぞ れ の 位置 を 対象 と し て いま す . この よう に , いろ いろ な 操作 を 行う スク リー ン ・ オ 
リエ ン テ ィ ッ ド な (その ター ミナ ル や コン ピュ ー タ で し か 動か な い ) アプ リケーション ・ プ ログ ラ 
ム の 実行 に は , それ ぞ れ の コル ピュ ー タ に , 各種 の スク リー ン ・ コ ント ロー ル の 機能 が 必要 で す . 

スク リー ン ・ コ ント ロー ル 機 能 の 主 な も の を 列記 する と, 


@ 画面 全 体 の クリ ア , 

@ カ ー ソ ル を ホー ム 位 置 (左上 端 ) に セッ ト . 

@ カー ソル の アド レッ シン グ (任意 の 位置 に セッ ト ). 

@ カ ー ソ ル 位 置か ら , その ライ ン の 終わ り ま で の イレ ー ズ . 
@ カー ソル 位置 か ら , 画面 最後 まで の イレ ー ズ . 

@ 輝 度 の コン トロ ー ル . 


な ど で あ り 。 これら は , 一 般 的 な エス ケー プ ・ シ ー ケ ンス な ど で コ ント ロー ル 可 能 で な けれ ば な り ま 
せん . 


6.3.1 エス ケー プ ・ シ ー ケ ンス と は 


エス ケー プ ・ シ ー ケ ンス と は , エス ケー プ ・ コ ー ド (1 BH) に 続く アス キー・ キ ャ ラク タ の 組み 合 
わせ を シー ケン シャ ル に スク リー ン に 出力 する こと に より , 上 記 の 各 機 能 の コン トロ ー ル な ど を , そ 


300 


スク リー ン ・ オ リエ ン テ ッ ド な ソフ トウ エア と ター ミナ ル の 適合 に つい て 


れ ぞ れ の 組み 合わ せ に 従っ て 行わ せる も の で す . 
例え ば ,。 アメ リカ で 大 変 ポ ピュ ラー な CRT ター ミナ ル で ある , SOROC 1IQ-120 の エス ケー プ ・ 
シー ケン ス の 実例 の いく つか を 示し ます と , 


@ ス クリ ー ン の オー ルク リア に に に ooo [ESC] * (つま り 1BH, 2AH) 

@ カー ソル 位置 か ら そ の 行 の 終わ り ま で を イレ ー ズ …[ESC]T (つま り 1BH, 54H) 

@ カー ソル 位置 か ら 画 面 終わ り ま で を イレ ー ズ ……… [ESC]Y (つま り 1BH, 59H) 

@ カー ソル の アド レッ シン ダグ ダー ドド ott [ESC] ーー (y) (x) (つま り 1 BH, 3DH, yyH., xx 日 ) 
と いう 具合 で す . 


これ を 具体 的 に 説明 する と , スク リー ン の オー ル ・ ク リア の 場合 は , エス ケー プ ・ コ ー ド の 1 BH, 
それ に “*” の アス キー・ コ ー ド で ある 2 AH を , 1BH, 2AH と 連続 し て コン ソー ル に 出力 する こ 
と に より , コン ソー ル は , それ を スク リー ン の オー ル ・ ク リア で ある と 解釈 し , 実行 し ます . 

も う 一 例 と し て 。 スクリーン 上 の =30,、Y マ = ニ 10 の ポイ ント , つま り , アド レス (30, 10) の ポイ ン 
ト に カー ソル を セッ ト す る 場合 は , 1 BH, 3DH, 2AH(=32 士 10) 3EH(=32 十 30) の 4 バイ ト 
を 連続 し て コン ソー ル に 出力 すれ ば 良い の で す . SOROC IQ-120 の カー ソル の アド レッ シン グ の XX, 
Y 座 標 に は 、 それ ぞ れ 32(= ニ 20H) の バイ アス 値 が 加算 され ます . つま り , 原点 は 左上 端 で あり , その 
座標 (X、Y) は (0, 0) で は な <〈 (20H, 20H) で ある 訳 で す . 

また 。 ス グリ ーシュ コン トロ 一 ルル は 。 これから の エネ ケー プ ・ シ ー ケ ンス に よる も の だ け で な く ぐ 。 コ 
ント ロー ル ・ キ ャ ラク タ に よる も の も 併用 きれ る の が 普通 で す . 


上 記 は 。SOROC 1Q⑩-120 CRT ター ミナ ル の 例 で す が 。 エ スケ ー プ ・ シ ー ケ ンス を 。 どの よう な シ 
ー ケ ンス に する か は , 残念 な が ら 統 一 規格 と いう も の は な く , ター ミナ ル の メー カー に よっ て まち ま 
ち で す . 

そこ で , ユー ザー は 。 それ ぞ れ 自分 の ター ミナ ル に 合わ せ て , 使用 する ソフ トウ ェ ア の スク リー ン 
出力 部 の ルー チン を 書き 替え な けれ ば な ら な いこ と に な り ま す . 


6.3.2 自分 の ター ミナ ル に 適合 させ る た め の ス クリ ー ン 出力 部 の 変更 


スク リー ン ・ コ ント ロー ル の コン トロ ー ル 法 は 統一 きれ て お ら ず , ユー ザー は , 湊 の 実行 例 に も 示 
され て いる よう な 。 いろ いろ な ター ミナ ル を 使用 し て いま す . し か し , ユー ザー が , それ ぞ れ 自分 の 
使用 し て いる ター ミナ ル に 合わ せ て , スク リー ン ・ オ リエ ン テ ッ ド な ソフ トウ ェ ア の スク リー ン 出 力 
ルー チン を , いち いち 書き 直す の で は 大 変 で す . 

そこ で 。 スクリーン ・ エ ディ タ や や 。 簡易 言語 や 。 他 の スク リー ン ・ オ リエ ン テ ッ ド な ソフ トウ ェ ア 
製品 の 多く は , それ ぞ れ の ター ミナ ル に 簡単 に 適合 させ る た め の 特 別 な # プ ログ ラム を 用 意 し て いま す . 
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その 1 つ を , 実例 と し て 示し ます . 

6 . 1 章 で 紹介 し た 簡易 言語 の SuperCalc は . スク リー ン 表 示 を フル に 活用 し た ソフ トウ ェ ア で あ 
り ,。 その 実行 に は , 各種 の スク リー ン ・ コ ント ロー ル が 必要 で す . それ ら の スク リー ン ・ コ ント ロ 
ー ル の 機能 を 持た な い CPM マシ ン で は , 実行 する こと は で きま せん . 

SuperCalc に は , いろ いろ な ター ミナ ル に 自動 的 に 適合 さき させ る た め の プ ログ ラム “INSTALL . COM” 
が 付属 し て お り , 誰 で も 極め て 簡単 に 自分 の 使っ て いる ター ミナ ル に 適合 させ る こと が で きま す . 

次 に この プロ グラ ム を 起動 し て , 途中 の 設問 に 答え た 状態 の スク リー ン の 表示 の 一 部 を 示し ます . 


0 COM* の 起動 後 ,2 一 3 の 問 に 答え だ 後 . 


wi モ th SUPERCALC 。 


Current terminal 』 Soroc 20 と | 現在 の SuperCalc は , SOROC IQ-120 用 に な つて いる こと を 示 ず . 
Q。 ADDS H。 Tel evideo 

B。 Qpple II 1 。 Vi sua1 

C. Beehive J・ Xerox | これ だ け の 種類 の ター ミナ ル グ から, 自分 の 

D。 DEC K。 Zenith ター ミナ ル と 同じ , まだ は 同等 な も の を 選 

E。 Haze1tine し .。 Infoton (GTC) | 天 け る . 

F。 Lear Sie ロ 1 er M。 ANS1 Btandard 

は 。 Soroc 


Y。 Mrite SBuperCalc to disk 
(with any changes made SO far。) 
7 。 Edit printer and termina1 data 


Enter QA-M。 Y。 Z or ? g』 D DEC の ター ミナ ル を 選択 し だ . 


You have selected a DEC termina1 。 
Terminals supported si 


1。 VT-52 (or compatib1e) | いた 思 
の (WT が 00 tmpattb1 ね ) 」 DEC の ター ミナ ル の 中 で も , この うち どちら か の 問い . 


X 。 Return も O モ 上 ermina1 51@Ct1On 
Enter 1。 2 (or X) * 


さら に この よう ね な 対話 形式 で 作業 を 進め て 行く こと, 自動 8 に 
目的 と する ターミナル 用 の SuperCalc が で き 上 る . 


Figure-6.3.1 SuperCalc の 各種 ター ミナ ル に 適合 きせ る た め の "INSTALL*" プ ログ ラム の 実行 の 一 部 . 


この よう に , や さ し い 対話 形式 な の で , 専門 の 知識 を 持っ て いな く て も 誰 で も 簡単 に 自分 の ター ミ 
ナル に 適合 させ る こと が 可能 で す . Apple II に も 適合 で きま す の で , Apple ユー ザー は お 見 逃し な く . 
た だ し , マイ クロ ソフ ト 社 の Z80 ソ フト カー ド に よる CPM 上 で の 話 で す . 

もち し, リスト アッ プ さ れ て いる , どの ター ミナ ル と も 同等 で な い 場 合 は , DDT な ど を 利用 し て , 直 
接 、 該 当 部 分 の ルー チン を 書き 替え る こと に な り ま す . 
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以上 は , SuperCalc の 各種 クー ミ ナル に 適合 させ る プロ グラ ム の 一 例 で す が , 他 の スク リー ン ・ オ 
リエ ン テ ッ ド な ソフ トウ ェ ア も , まとも な 製品 な ら ば , ほとん ど が この よう な 便利 な プロ グラ ム を 付 
属さ きせ て いま す (Multiplan や CIS-COBOL の も の は 特に 良く で き て いる ). 

ご め よ うに 。 最近 の ヤダ フトウェア ほ 。 スク リー シギ リエ シテ デッド な も の が 多く な り 。 CP/M マシ 
ン の ター ミナ ル は , 各種 スク リー ン ・ コ ント ロー ル が サポ ー ト され て いる も の を 使う こと か 必須 と な 
っ て いま す . 


6.3.3 パー ソナ ル ・ コ ンピュータ の 場合 


パー ソナ ル ・ コ ンピュータ で , この よう な スク リー ン の 機能 が 最初 か ら サ ポー ト さ れ て いる も の は 
少な く , し か た な く 〈 く CP ン M の BIOS 内 に 組み 込ま な けれ ば な り ま せん . 非常 に うま < BIOS 内 に ス 
クリ ー ン ・ コ ント ロー ル 機 能 を 組み 込ん だ が 例 と し て は , NEC の PC-8000 シ リー ズ 用 に NEC が 発売 
し て いる CPM や , 沖の 潤 800CP プ M な ど が その お 手 本 で す . 

これ は , BIOS 内 に , 前 述 の SOROC IQ-120 と 等 価 の スク リー ン ・ コ ント ロー ル ・ ル ー チ ン を 組み 
込ん だ も の で , ユー ザー は , PC-8000 レ シリ ー ズ の パー ソナ ル ・ コ ンピュータ の スク リー ン を SOROC 1Q 
-120 と 思っ て 使用 する こと が で き , 各種 の スク リー ン ・ オ リエ ン テ ッ ド な ソフ トウ ェ ア を 自由 に 実行 
する こと が 可能 で す . 

よっ て , パー ソナ ル ・ コ ンピュータ の CP ン M を 購入 する 際 は , この 点 も よく 確認 し な けれ ば な り 
ませ ん . 非常 に 重要 な ポイ ント で す . 


6.4 CPZM マ シン と PROM 書 込 器 と の 接続 


CPM 上 で 開発 し た プロ グラ ム を PROM に 固定 し た い 場 合 , ある い は , すでに 書き 込ま れ て い 
る PROM 上 の デー タ を 読み 出し て , 逆 ア セン ブラ な ど で 解 析 し た い 場 合 な どの , CPM マシ ン と 
PROM 書 込 器 と の 間 の デー タ 転 送 の 実例 を 紹介 し まし ょ う . 

と は 言っ て も , この よう な こと は 一 項 を 設け て 解説 する まで も な く 〈 く , PIP コマ ンド を 使い こなせ る 
ユー ザー で あれ ば , 造作 も な いこ と な の で す が , RS-232C イン ター フェ イス は , た っ た 3 本 の 線 で 接 
続 す る だ け で 相互 に 通信 可能 で ある こと な ど を 含め て , 実例 で 示し まし ょ う (PIP コマ ンド の すべ て 
の 使い 方 は , 「 実 習 CPM」 の 4 . 2 章 で 解説 し て いま す . 参照 下さ い .). 

使用 する PROM 書 込 器 に は , RS-232C の イン ター フェ イス が 装備 され て お り , イン テル HEX 形 
式 の デー タ の 送受 が で きる ソフ トウ ェ ア が 内 蔵 さ きれ て いる こと が 前 提 と な り ま す . 大 抵 の 本 格 的 な PROM 
書 込 器 は , この よう な 機能 を 持っ て いま す . 

一 方 、 パ ー ソ ナル ・ コ ンピュータ で な く , ソフ トウ ェ ア 開 発 用 の マシ ン は , PROM 書 込 器 が 内 蔵 さ 
れ て いる の も 多く , 独立 し た 書 込 器 を 使う 必要 は あり ませ ん の で , ここ で の 解説 か ら は 除外 し ます . 
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6.4.1 RS-232C と イン ター フェ イス の 接続 


RS-232 と イン ター フェ イス の コネ クタ の 一 般 的 な 標準 は 、 25 ピ ン の D 型 コネ クタ で , 決 の ピン ・ 


アサ イメ ント に な っ て いま す . 


CG (chasis GND) 
TD (Tx Data) 
RD (Rx Data) 
RTS (Request To Send) 
CTS (Clear To Send) 
DSR (Data Set Ready) 


受信 デー 


ケー ス の GND 


送信 デー 


グ 
グ 
送信 要求 
送信 可 
デー クタ 送受 可 


信号 GND 
キャ リア 検 出 
デー タ 送 受 可 


SG (Signal Ground) 
CD (Carrier Detect) 
DTR (Data Terminal Ready) 


矢印 の 向き は コネ クタ か ら 見 た 信号 の 流れ . 


上 記 の ピン ・ ア サイ メン ト は , 一 応 の 標準 で は あり ます が , 統一 され て いる 訳 で は あり ませ ん の で , 
各社 まち まち な の が 現状 で す . 

そこ で , CPM マシ ン と PROM 書 込 器 と の RS-232C イン ター フェ イス 相互 の 接続 は . それ ぞ れ 
の ハー ドウ ェ ア ・ マ ニュ アル に 従っ て 行わ な けれ ば な り ま せん . 


PC-8001 の CPZM に 接続 され た PROM 書 込 器 
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RS-232C の 動作 は , 各種 コン トロ ー ル ・ ラ イン に よっ て ,。 コン トロ ー ル され て , 高速 の シリ アル 伝 
送 が 可能 と な り ま す が , 300 ボ ー 以 下 程度 の 速度 で あれ ば , コン トロ ー ル ・ ラ イン に よる 制御 を 受け ず 
に デー タ の 送受 が 可能 で す . 

300 ポ ボー の 低速 で は , PROM 書 込 器 を 頻繁 に 使う ユー ザー に と っ て は , 仕事 に な ら な いと 思わ れ ま 
す の で , きち ん と ハン ド シ ェ イク を 行っ て 高速 伝送 が 可能 と な る よう に 接続 し て 下さ い . この 仕事 は 。 
それ ぞ れ の イン ター フェ イス の マニ ュ ア ル が 不備 で あっ た り し て , な か な か うま く 行 か な いも の で す . 


ここ で は , 次 の 図 に 示す よう に , コン トロ ー ル ・ ラ イン を 全く 相互 に 接続 せ すず, GND と Tx, Rx 
の 3 線 で 接続 し , 300 ボ ー 以 下 で 使用 する こと に し て , PROM 書 込 器 と の 転送 作業 を 行っ て み ま し ょ う . 
この 方 式 で す と , 大 抵 の RS-232C 機器 間 で 無 条件 に 伝送 が 可能 で す (イン ター フェ イス に よっ て は , 
自分 自身 の コネ クタ 内 で 。 コン トロ ー ル 線 を ジャ ン パ パ す る 必要 が ある か も 知れ ませ ん ). 


Em ナー 


300 ボ ー 以 下 で 使用 する 場合 は , 3 線 の み 
の 接続 で 相互 の 伝送 が 可能 で す . 


CP ノ M マシ ン 側 PROM 書 込 器 側 


Figure-6.4.1 RS-232C を 3 線 で 相互 接続 


6 .4.2 CP/M て 開発 し た プロ グラ ム の PROM 書 込 器 へ の 転送 


両者 の 間 は , Figure-6.4.1 に 示さ れ て いる よう に 接続 きれ て お り , ボー レー ト は 両者 共に 300 ボ ー に 
設定 され て いる と し ます . 
開発 され た プロ グラ ム は , イン テル HEX 形式 の ファ イル (ROM . HEX と で も し て お く ) で ディ 
スク 上 に ある と し て , 2 K バ イト 未満 の オプ ジェ クト で 2716 タ イプ の PROM に 書き 込む 場合 の 手順 
を 示し ます . 
1. まず , PROM 書 込 器 の マニ ュ ア ル に 従っ て , RS-232C イン ター フェ イス か ら デ ー タ を 受け 取 
る 準備 を し , 用 意 が で きた ら 受 信 状 態 に し て お きま す . 
2. PIP コマ ンド て で 転送 する ファ イル “ROM . HEX” を RS-232C か ら 送 り 出 し ます . PIP コマ 
ンド の デバ イス 名 は , コン ピュ ー タ に よっ て 異な り ま す . ここ で の 実例 は , PC-8801 で NEC の 
CP/M を 使っ た 場合 の も の で す . その 様子 を 次 に 示し ます . 
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A>PIP_PUN』 =RUM. HEXEE]) PUN : "デパ イス ガ ら ファ イル "ROM. HEX” を 送り 出す . [E] バ ラメ ー タ を 
付け て お ぐ と . 実 行状 態 が よ ぐ 分 か る . 
10OOOO00OQ さ 1 さ BBOCDBAOOAF さ 201BO さ 202BO さ 20OBOB5 
ョ 1OOO1000210000220 さ BO2 1 さ BBO2205BO2207BOD さ 1 B 
s 10OO2OOO51D さ B1 1 1 さ 7O4CD 10O04DBB2E60 1CA29O0O67 
1OOO さ OOOCDBOOO さ 1 さ BBODBB2OFDCBOOOOFDCDFOOC5 
* 1OOO4OOO さ O 1 OBZ ヒ A さ さ OO2AO7BO7E さ 2OABO2 さ 7EB5 
- s 10005OQOO さ 209B02 さ 1 1 OBBOO6OB7E 122 さ 1 さ O5SC259 さ 2 
き 1O006000002207OCDD さ O1 さ QO1BO さ D さ 201 ヨ 8OC2 さ 36 


』 1000700000 さ 202B021 さ BBO2205802207BOC さ ささ OOAA | 「E]/ パ ラメ ー タ に より , 送り 出さ れる デー タダ 
ょ 1000BOOOF5SEO10 く B1AFDSB12A03BOEB2A05BO72CC | が 次 スワ リー ン に も 出力 され る . 
』 10009O002 さ 7 さ 0606 さ EFF2 さ 7705C296002 さ 702 さ さ A9^ 


Figure-6.4.2 CP/M マシ ン か ら で き 上 っ た プロ グラ ム を PROM 書 込 器 に 転送 する . 


3. デー タ の 転送 が 終了 し て , 受信 が 成功 し た こと が 確認 さき れる と , PROM 書 込 器 は , 何ら か の 合 
図 を 出す で し ょ うか ら , PROM へ の 書き 込み 作業 を 行い ます . 


6.4.3 未知 の PRO 内 デー タ を 読み 出し て ,CP/M て 解析 する 例 


CPM マシ ン と , PROM 書 込 器 は 前 項 の 通り に 接続 ・ 設 定 し て ある と し ます . 未知 の PROM に 
は , 前 項 で 書き 込ん だ ば か り の チッ プ を サン プル と し まし ょ う . 

PROM 内 の デー タ を CPM マシ ン て 受信 し て , HEX ファ イル と し て ディ スク に セー プ す る 手順 
を 示し ます . 


1. まず ,。CP/M マシ ン 側 で , 先 に PIP コマ ンド を 実行 し て お きま す . ファ イル 名 は “ROM 1 . 
IE 流 " と 人 で 全 し て 燈 き まし だ た 。 


A>PIP ROM1 . HEX=RDR : [E] 


PIP コ マン ド の デバ イス 名 は ,、 コ ンピュータ に よっ て 異な り ま す が , ここ で の 実例 は , PC-8801 
で の NEC の CPM の も の で す . 

2. この 後に , PROM 書 込 器 を 操作 し て , 未知 の PROM 内 の デー タ を 読み 出し て , RS-232C か 
ら HEX コー ド と し て 送り 出し ます . 
その 時 の CPM 側 で の 受信 例 と , 生成 され た HEX ファ イル の 確認 の 様子 を 次 に 示し ます . 
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CPZM マ シン と PROM 書 込 器 と の 接続 


*RDR : アバ イス か ら 受 信 し て , ファ イル *ROM1 .HEX* を 作る . [E ナ ラメ ー タ 

A>PIP RON1 HEX=RDRI EE〕 ) を 付け て お ぐ と , 受 介 状 態 ガ よこ 分 か る . さ ら に [H」/ パ ラメ ー タ を 付け て "HE 
と する 万 が ベタ ー で ある . HEX フ ァイル の エラ ー の チエ ッ ク を 行っ て くれる. 

1000O000 さ 1 さ BBOCDBAOOAF さ 201BO さ 202BO さ 20OBOBS 

10001000210000220 さ BO21 さ BBO22058O2207BOD さ 1B 

10002O0051D3B1 1 1 さ 704CD1004DBB2E601CA290067 

1 10OOSOOOCDBOOO さ 1 さ BBODBB2OFDCBOOOOFDCDFOOCS 

10004OOO さ AO18BOB7CA さ さ OO2AO7B07E さ 20ABO2 さ 7EBS 

10005OOO さ 2098O2 さ 1 1 OBBOO6OB7E 122 さ 13O5C259 さ ろ 

』 100O6OOOOO2207BOCDD さ O13O1BO さ D さ 201BOC2 く さ A6 

』 10007OOOOO さ 202BO21 さ BBO2205802207BOC さ ささ OOAA 

ュ 10OOBOOOF53EO1D さ B1AFD さ B12A0 さ BOEB2AO5BO72CC か AN 

』 100090002 さ 7 さ O606 さ EFF2 さ 77O5C296002 さ 702 さ 39A お 


10O7DOOOFFOOFF 1OFFOOFFOOOOFFOOFFOOFFOOFF 1 1 
s 1007EOOOFFOOFFOOFFOOFFOOOOFFOOFFOOFFOOFF 1 1 
s 1007FOOOFFOO6FOOBFOOFFOOB4FFOOFFSOFFOOFFFD 
s OOOBOOO1F フ ア 


A> デー タ の 終わ り を 受信 する と , 自動 的 に ファ イル *ROM1 .HEX“ ガ 作ら れる . 


Figure-6.4.3 PROM 書 込 器 か ら の 未知 の ROM デー タ の 受信 . 


A>BTAT RON1 。HEX ) 生成 され だ ファ イル の 確認 . 


RECB BYTES EXT ACC 
46 ら 6 に 1 R/M AsROM1 。HEX 6K バ イト に の HEX フ ァイル が 作ら れ て いる . 
BYTES RENAINING ON Ai 14 に K 


仙 > 


Figure-6 .4.4 生成 され た HEX ファ イル の 確認 . 


3. 生成 され た 未知 の ROM 内 デー タ の ファ イル “ROM1 . HEX” を DDT や ZSID な ど に より 
解析 し ます . DDT に より メモ リ 上 に ロー ド し た 様子 を 次 に 示し ます . 
この ROM 内 デー タ は , Figure-6.4.4 の HEX デー タ の アド レス 部 か ら , ロー ド ・ ア ドレ ス は 
0 H で ある こと が 分 か る の で , DDT な ど で メ モリ 上 に ロー ド す る 場合 は , 100H 以 上 に ロー ド 
する た め の バ イア ス を か け な け れ ば な ら な いこ と に 注意 し ます . 
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CPZM の アプ リケーション いろ いろ 


/ ppr DDT を 起動 . 


DDT VERS 2.2 


ーIROM1.HEX ) | 100H の バイ アス を つけ て *ROM1 .HEX" を ロー ド . 
ーR1QO 』 「 (100H は の バイ アス を つけ だ の は , この プロ グラ ム が 0H 
NEXT PC スタ ー ト の だ め ) 
Q9OO QBOQO 

ー-L1QQ 


O10O  LX1I  SP,BQ さ B 

Q10 さ CALL OOBA 

Q1O6 XRA QA 

O107 STA BOO1 未知 の ROM 内 プロ グラ ム が , COP プ M の メモ リ 
O1OA STa BOO2 上 に ロー ド さ れ た だ . 以後 は 遡 ア セン ブル な ど で 
O1OD STaA Booo 解析 を 行 つ て 行 ぐ . 

O110  LX1I H,OOOO 

O11 さ SHLD BOO さ 

O116  LX1I H。B0SB 

O119 SHLD BO05 

O11C SHLD 00 フ 7 


に 


Figure-6.4.5 未知 の ROM 内 デー タ を 、 CPM 上 で 解析 する . 


6.5 CPZM マ シン 間 の 音響 カプ ラ に よる 通信 


最近 。 数 社 か ら 5 万 円 を 切る 低 価 格 の 音響 カプ ラ が 発売 され て お り , 電話 が つなが る 所 な ら 日 本 国 
内 と 言わ ず 世 界 中 どこ と で も CPM マシ ン 間 の デー タ の 送受 が 行え を ます. 

音響 カプ ラ の ほとん どの も の は , RS-232C イン ター フェ イス で 入出 力 を 行っ て いる の で , CPM マ 
シン は , RS-232C と イン ター フェ イス が サポ ー ト され て いる も の で ある こと が 前 提 と な り ま す . 

音響 カプ ラ に よる 電話 線 を 介し て の デー タ の 伝送 は , 各種 ノイ ズ が 混入 する 機会 が 非常 に 多く , 長 
い デ ー タ 伝送 に な れ ば な る ほど , エラ ー 率 は 増加 し ます . よっ て , 電話 線 を 介し て の 伝送 は , エラ ー 
は 必ず 発生 する こと を 考 應 し て 作ら れ た プロ トコ ル を 持っ た 「 デ ー タ 通信 用 ブ プログラム 」 に よっ て デ 
ー タ 伝送 を 行う こと が 不可 欠 で す . 

その プロ トコ ル の 基本 は , 例え ば , 送り 出し 側 で 128 バ イト とか, 256 バ イト と か を 1 ブロック と し , 
プロ ッ ク 単 位 で チェ ッ ク サ ム や CRC(Cyclic Redundancy Check : チェ ッ ク サ ム よ り 高 度 な エラ ー・ 
チェ ッ ク 方 式 ) な ど を 算出 し . その プ ブロッ ク の 最後 に 付加 し て 送り 出し ます . 受信 側 で は , 受信 し た 
デー タ を ブロ ッ ク 単 位 で チェ ッ ク し , OK で あれ ば OK サイ ン を 送信 側 に 返し , 次 の ブロ ッ ク の 送信 を 
要求 ます . も し エラ ー が 検出 され れ ば 再び 同じ プロ ッ ク の 再送 信 を 要求 し ます . 

と , この よう な 手順 で 送受 両者 が ハン ド シ ェ イク し な が ら デ ー タ の 送受 を 行う 訳 で す . 
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CP/M マ シン 間 の 音響 カプ ラ に よる 通信 


6.5.1 専用 プロ グラ ム を 使用 せ ず ,PIP コ マン ド て 伝送 する 例 


通信 プロ トコ ル を 持っ た 専用 プロ グラ ム を 使用 し な けれ ば , 電話 線 を 介し て の 伝送 は 実用 に は な り 
ませ ん . し か し , CPM の PIP コマ ンド に は , HEX ファ イル の 送受 の 際 の 異状 を 検出 する [H] パ 
ラメ ー タ が あぁ り (実習 CPM 4. 2 章 参照 )、 短い イン テル HEX 形式 の デー タ な ら , 伝送 可能 で す . 
た だ し , PIP は エラ ー を 検出 する と 自動 的 に 入力 を 停止 し ます の で , その 場合 は 最初 か ら や り 直 さ な 
けれ ば な り ま せん . 

で は , CPM の マス ター・ デ ィ ス ク に 含ま れ て いる “DUMP . ASM” を , ASM で アセ ンプ ブル し 
て 生成 され る DUMP . HEX′ を 音響 カプ ラ を 使っ て , 電話 線 で 伝送 する 例 を 示し ます . 


6 . 4 章 の 場合 と 同様 に . CPM マシ ン と 音響 カプ ラ の RS-232C イン ター フェ イス を 接続 し , 
ボー レー ト を 300 ボ ー に 設定 し ます . 音響 カプ ラ の 通信 モー ド は , 送受 と も 半 二 重 (HALF) に 
セッ ト し ます . CALLーANS の 切替 は , 送信 側が “ANS”, 受信 側が “CALL” に セッ ト し ま 
す . 

相手 と 電話 で 打ち 合わ せ を し , その 後 , 受話 器 を 音響 カプ ラ に セッ ト し , カプ ラ の 電源 を 入れ 
まず 

まず 受信 側 か ら 先 に 次 の PIP コマ ンド を 実行 し ます . 作 られ る ファ イル 名 は , ここ で は TEST . 
HEX と で も し て お きま す 。 


A>PIP_ TEST . HEX=RDR : [HE] J 
手順 3. の あと に , 送信 側 は 次 の PIP コマ ンド を 実行 し ます . 
A>PIP_JPUN : =DUMP . HEX[E], EOF : 』 


ノイ ズ な ど に よる エラ ー が な けれ ば , これ で 自動 的 に 受信 し た デー タ の ファ イル が 作ら れ ま す . 
エラ ー が 発生 すれ ば , 受信 側 で は エラ ー・ メ ッ セ ー ジ を 出力 し て , 受信 を 停止 する の で , 再び 
手順 の 2. か ら や り 直 し ます . 


次 に 受信 側 の 実行 の 様子 を 示し ます . 送信 側 は , PIP の コマ ンド ・ ラ イン が 異な る だ け で 同様 な の 
で 省略 し ます . 
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人 TEST . HEX=RDRi [HE] ^RDR : デバ イス か ら 入 力 し て , その デー タ を ファ イル ル "TEST. HEX" と し て セー ブ す る . 
ーー 、 HEX フ ァイル を チエック を させ る だ め の [H] バ パラ メー タ を 秘 ず 付け る こと . 
s 10010000210000 さ 9221502 く 15702CDC1O1FEFFC2B4 
s 1OO1 1OOO1BO1 1 1F さ O1CD9CO 1 さき 101 さ EBO さ 2 1 さ O2 さ 谷 
s 1OO1200O210OOOESCDA2O1E1DQS1O01477DE6OFC2D1 
s 1OO1 さ OOO44O1CD72O1CDS9O1OFDQ51017CCDBFO1FF 
s 1OO14OOO7DCDBFO 1 2 ささ E2OCD65O 1 7BCDBFO 1 ビ さ 2 さ 66 
1OO1SOOOO1CD72012A1502F9C9ESDSCSOEOBCDOSF 1 
s 10016OOOOOC1D1E1C9ESDSCSOEO2SFCDOSOOC1D1O1 


で [E] パ ラメ ー ダ に より , 入力 デー ダ は , 誠 次 
・ ス フ リ ー ン に や も 表示 され る . 


s 1OO1EOOO4S204. 4554DSO205645525 さ 494F 4E2O さ 1 DD 
s 1OO1FOOO2E さ 424ODOn4E4F2O494E5O5S5542O464966 
* 1OO2OOOO4C45205O52455 さ 454E542O4F4E2O4449B2 
s O さ O2 1OOO き さ 4B2429 

OOOOQOQOOO 


oo エラ ー な ぐ 受 信 で きだ 場合 に は , 以上 の HEX デ ー タ が , ファ イル "TEST. HEX" と し て セー ブ さ ね てい る. 


Figure-6.5.1 音 才 カ プラ に よる 電話 線 を 使っ て の デー タ 受 信 側 . 


注 ) PIP コマ ンド の デバ イス は , コン ピュ ー タ に よっ て 異な り ま す 。 ここ で の 例 は , 送受 と も PC 
-8801 の RS-232C イン ター フェ イス を , NEC の CPM で 使用 し た も の で す . 


以上 の よう な 手順 で , 専用 の 通信 プロ グラ ム が な く て も , HEX ファ イル で あれ ば , 2 3 回 や り 直 
し を すれ ば 伝送 可能 で す . 通常 は , 通信 プロ グラ ム を 使っ て いま す の で , 今回 の 方 法 は 初め て の こと 
で あり , アス キー の 出版 部 と , 筆者 宅 の 間 で 実験 を 行い まし た . 回 線 の 状態 に 大 きく 依存 し ます が , 
だ いた い 2 回 に 1 回 は 成功 する よう で す . 


音響 カプ ラ に よる 通信 を 行っ て いる 筆者 の 現在 の マシ ン 類 . 電話 機 の 左 は ミニ ファ クス . 右端 は , YD-74CX2 ド 
ライ ブ を 接続 し た 往年 の S-100 シ ステ ム SOL-20. (本 書 が 出版 され る 頃 , 左端 の 8 イン チ シ ス テム て 満足 の いく 高 
速 CPM( 未 発売 ) が 稼動 を 始め , 随分 と 活躍 し た SOL も 交代 の 時 代 が 来 た . ) 
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あと みき 


アス キー・ ラ ー ニ ング シス テム の CPM シリ ー ズ は , この 「 応 用 CPZM」 で 一 応 完結 で す .「 入 
門 CP プ M」 に 着手 し て か ら , この 応用 編 が 発売 され る まで , 1 年 半 も か か っ て し まい まし た . し か し , 
な ん と か まとめ 上 げ る こと が で きた の は , 「 早 く 応 用 CPM を 出せ 」 と いう 実に 多く の 当 シ リー ズ 愛 
読者 の 多大 な 期待 に 支 を られ て いた た めで す . どう も あり が と う ご ざ いま し た . 

CP/M の 良さ は , その 科 潔 さ に あり ます . その 人 箇 潔 で ある た め に 持ち 合せ て いな い 機 能 を 捕らえ て , 
欠点 で ある と 言う 人 も 中 に は いま す . 私 は それ ら の 人 は , も し か し た ら 8 ビッ ト の マイ クロ コン ピュ 
ー タ に 取り 組ん だ こと が な い の で は な いか と も 思い ます . 相手 は ミニ コン ピュ ー タ や や 大型 コン ピュ ー 
タ で は あり ませ ん . 

要 は コン ピュ ー タ の 能力 と の バラ ンス の と れ た OS で ある こと が 大 切 で す . 16 ビ ッ ト の, それ も 68000 
あたり の コン ピュ ー タ で あれ ば , 現在 の CPM で は 明らか に バラ ンス し ませ ん . そこ で は 新しい CP/ 
M で ある コン カレ ント CPM と か , UNIX と か の 世界 に な る で し ょ う . 

私 は , 当 シ リー ズ の 最後 に , 「 応 用 CPM」 を 読ま れ た 読者 の みな さん に 1 つ お 願い が あり ます . 

それ は , CPM の 存在 を 知ら な か っ た り , 名 前 は 知っ て いて も 取り か か る 糸口 が 見 つか ら な いで い 
る 多く の 優秀 な 若者 に ,. この CPM の 世界 が ある こと を 教え て あげ て ほし い の で す . 彼ら の 多く は , 
パー ソナ ル ・ コ ンピュータ に 組み 込ま れ て いる BASIC 言語 の 殻 の 中 だ け で コン ピュ ー タ と いう も の 
を 見 て いる と 思う の で す . し か し 何 か の きっ か け で , アセ ンプ ラ な り 他 の 言語 な り に 興味 を 持つ よう 
に な り , 大 きく 飛躍 する こと が で きる か も 知れ ませ ん . BASIC か ら 離 れ よ うと し た 時 , そこ か ら が す 
べ て の 始ま り で ある と いう 気 が し て な ら な い の で す . 

読者 の 回 り に , その よう な 熱心 な 若者 が いた ら , 基 非 CPM の 世界 の こと を 話し て あげ て 下さ い . 


ソフ トウ ェ ア の 世界 は 限り な く 〈 広 く , CPM は この 海 に 乗り 出す た め の 小 さ な 船 に 過ぎ ませ ん , し 


か し , 小さ いな が ら 信 頼 で きる 船 で す . 
今夜 は 。 シン プル で 小さ な 船 「CP プ M」 に 乾杯 ! 


5 章 の 「 各 種 高級 言語 .」 で は 、 ABC の 河田 至 弘 氏 、 電通 大 の 打 


越 浩幸 氏 .、 リ ギ ー コ ー ポ レー ショ ン の 片桐 明 氏 に いろ いろ と 助け 村瀬 康治 
て 頂き まし た . 無理 な お 願い を 心 良 く 引 き 受 け て 下さ っ て , は ん テレ ビ 朝 日 技術 局 勤務 
と うに あり が と う ご ざ いま し た . 初版 時 36 歳 
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好人 録 4 MC の CP/77 に つい て 


1982 年 7 月 に , PC-8001 ま た は PC-8801 に 共通 の CPM が NEC か ら 発売 され まし た . ディ スク 
の アク セス ・ ス ピー ド は , 8 イン チ の 標準 ディ スク の 場合 より 速く 非常 に 高速 で あり , 日 本 の CPM 
で は 初め て の “タイ プ ・ ア ヘッ ド 機 能 ′ な ど , 多く の 拡張 機能 を 持っ た 画 期 的 な も の で す . ここ で は 
NEC の CPM で 一 番 最初 に 発売 され た , ミニ ディ スク 用 片面 バー ジョ ン の も の の 概要 を 紹介 し て 
お きま す . 


@ 対 象 機種 
PC-8001 十 (PC-8011 ま た は PC-8012・8013) お よび , 
PC-8801 (N-BASIC モー ド で 動作 ). 


人 使用 ディ スク ・ ユ ニッ ト : 
PC-8031-1W ある い は PC-8031-2W (た だ し 1W と し て 動作 する ) の いずれ で も 可 . 


@⑯NEC-CP プ M 独自 の 拡張 機能 : 

1) エ スケ ー プ ・ シ ー ケ ンス 等 に よる スク リー ン ・ コ ント ロー ル ( 6 . 3 章 参 照 ), お よび N-BASIC 
内 グラ フィ ッ ク 機 能 な どの コン トロ ー ル . 

2) N-BASIC ROM 内 各 ル ー チ ン の 呼び 出し 機能 , 

3) 割 り 込 み 処理 に よる バッ ファ リン グ ・ キ ー 入 力 機能 (これ を “タイ プ ・ ア ヘッ ド 機 能 ” と 言 
い ,。 コン ピュ ー タ が いか な る 処理 を 行っ て いる 場合 で も . また , いか に 速く タイ プイ ン し よ ょ 
うと , キー が 押さ れ た も の は 1 文字 た り と も 取り こぼす こと な く 入 力 が 行え る 機能 ). 

4) 任意 の プロ グラ ム を , CPM の 起動 時 に オー ト ・ ス ター ト さ せる こと が で きる . 

5) 割 り 込み 処理 に よる RS-232C ポー ト を 2 チャ ン ネ ル , 通常 処理 に よる も の を 1 チャンネル , 
計 3 チャ ン ネ ル の RS-232C ポー ト を サポ ー ト . 

6) フ ァ ン クシ ョ ン ・ キ ー に より スク リー ン ・ コ ピー 等 の 機能 を サポ ー ト し , ユー ザー に よる 定 
義 も 可能. 

(その 他 省 略 ) 
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NEC の CPM に つい て 


@ マ スタ ー・ デ ィ ス ク に 含ま れ て いる 独自 の ユー ティ リティ ・ プ ログ ラム : 
1) ディ スク = ェ フォ ーママ タネ 。 
0 ディ ォ ス あ ・ ラ ピー. 
3) オー ト ・ ス ター ト 設定 プロ グラ ム . 
4) ファ ンク ショ ン ・ キ ー 定 義 ヴ ログ ラム . 
5) CPM サイ ズ の 変更 を , 完全 に 自動 的 に 行う プロ グラ ム . 
(その 他 省 略 ) 


NEC は ,、 この ミニ ディ スク の 1 W 用 の あと , 2W 用 の CPM, それ に PC-8801 N88 モー ド で 動 
作 す る 8 イン チ ・ デ ィ ス ク 用 CPM を 順次 発売 し て いく 子 定 で いる よう で す . 期日 は 未定 . 


人 A>STAT ※。※/ 


Recs Bytes Ext 
8k AASM .COM 
AsAUTHELL0.COM 
AAUT0-ST.COM 
AiCOPY .COM 
AiDDT COM 2 
AiDISKDEF .LIB 
AA:DUMP . ASM 
AiDUMP ,COM 
ED ,COM 
AiFORMAT .COM 
AkHELLO.ASM 
AsHELL056,CONM 
AiKEY .COM 
AiLOAD,COM 
AiMODULE .HEX 
AiMOVCPM .COM 
AiPIP .COM 
AiSTAT .COM 
AiSUBMIT .COM 
ASMITCH.COM 
AiSYSGEN .COM 
AiUSER , ASM 
191 AiUSERI0.ASM 
32 AMCLOCK .CONM 
6 1 AiXSUB .CONM 
Bytes Remaining On Ai 3k 


> 


1 
1 
1 
1 
中 
1 
1 
1 
届 
1 
2 
PC-800| CP プ M の オー プ ニ ン グ 画 面 1 
1 
1 
1 
中 
1 
1 
1 
1 
1 
1 
1 
1 


Figure-A.1 PC-8001 CPM に 含ま れ て いる ファ イル . 


婦 C27 た で 送る 4S7C 計 許 の 
ズ ステ ー ル マン た * 諾 数 公表 一 覧 表 


CPM 上 の 高級 言語 で , 最も ポピュラー に 使わ れ て いる BASIC 言語 の 代表 的 な も の を 4 種類 ( そ 
の うち 2 種 は コン パイ ラ ) を 取り 上 げ , その ステ ー ト メン ト と 関数 の 一 覧 表 を 示し ます . 
取り 上 げ る 言語 を 次 に 示し ます . 


@ び MBASC (イン ター プリ タ ) 
@BASCOM (コン パイ ラ . 3. 4 章 参照 ) 
人 @CBASIC (中 間 コ ー ド ・ イ ンタ ー プ リタ ) 
@CB-80 (コン パイ ラ . 5.3 章 参照 ) 


1. ステ ー ト メン ト お よび 関数 一 覧 表 


弄 ”  。 株 台 。 | caasic | cm-so | vmAsic | mAscow 
2 な 5 し | OHAN | CHAN | OHAN | CHAN | 
| Mo プログラム: モ ジュ ー ル へ の 義 の 引 し | GOMMON | GOMMON | GOMMON | COMMON | 
制 | SUB 手 続き に 処理 を 移行 5 Pa 
[本 の プロ グラ ム の 表 行 始 | CALL | CALL | CALL | GAL | 


和 | キー ボー ド から 入力 し て 変数 に 代入 | INPUT | INPUT | NNPUT | NpuT | 

則 | コン マ も テー タ と し て キー ポー ド か 5 1 行人 | NPUT LNE | NPUTLNE | LNE INPUT | LNENPUT | 

[画面 に 情報 を 出 カ | PRNT | PRNT | PRNT | PRNT | 

テ | 環 面 に 指定 書式 で 、 数 休 を 表示 | PRINT USING | PRINT USING | PRINT USING | PRINT USING | 

| | プリ ンタ に 情報 を 出力 | PRNT | PRNT | LPRNT | LPRNT | 

メ | ブリ ンタ に 指 書 式 で 婦人 を 印 | PRINT USING | PRINT USING | PRINT USING | PRINT USING | 
| 


指定 した 出力 ボート に デー タ を 出力 | GUT | OUT | our | our | 
メモ リ の 指定 秋 地 に デー タ を 書き 込む | POKE | POKE | EoKE | EokE | 
時 を コン ツール か ら ブ リン タ に 委 更 ] LPRINTER | LPRNTER | | | 
ィ | 貞和 慎 を プリ ンタ か ら コン ツー ル に 和 更 | GoNSOLE | GONSOLE | | | 
ル | DATA 六 で を 義 さ れ た を 雪 委 数 に 代入 | READ | READ | READ | READ | 
2 | READ 広 で 読 み 込ま れる アー タ の 格 級 | DATA | DATA | DAA | DA | 


4 
ド 


| シーケンシャル. ファ イル か ら の テー タ 入 力 | READ* | READ* | NNPUTS | NPUTB 
| ラン ダム. ファ イル か ら の デー タ 入 力 | READ#* | READ* | GErs | GErs | 
| レー ケン シャ ルフ ァイル か ら の 1 行 入 力 READ* LNE|READ* LNEILNENPUTs 

| ラン タム: ファ イル か ら の | 行 入力 READ* LNEIREAD*LNE| | 


ご CPM 上 で 走る BASIC 言 語 の 
ステ ー ト メン ト 関数 比較 一 覧 表 


BASCOM 


2 の TI 
レー テン シャ ルフ ァイル に アー タ を 時 力 | PRNTS | PRNTS | PRNTS | PRNTS 」 
ラン タム ファ イル に デー タ を 遇 罰 | PRNTS | PRNT* | POT* | POTS 
シー タン シャル ファイ ル E 拓 で テーク を |PRNT ォ USNG]PRINT = USNG]PRNT# USNG] PRNT# USNG 
| ランダム. ファ イル に まま で デー タ を 時 PRNT* USNG]PRNT# USNG] | | 
| ディ ネ ク に 1 バイ ト の デー タ を 量 カ | | pm | | 
ae rE 和 の 上 人 | GGTm | Gor9 | GOTO | Go 
拓 定 され た ラベ ル の 廊 へ 押入 候 | | GOO | | 
eeoc565o9 ファー デン 2 | cosum | cosum ] cosum | cosum 」 
ke た z<z の タプ シー チン へ 2 | | GO905 | | | 
| | 条件 断 に よる プロ グラ ム の 流れ の 制 |F THEN-ELSE]F THEN-ELSE FTHEN-ELSE |F -THEN-ELSE| 
天 の 値 に 指定 和紀 の へ 分乗 | ON-GOTO | ON-GOTO | ON-GOTO | ON-GOTO | 
ン | の 仙 に 』 りう ベル の へ を 人 閉 | | ONGo70 | |  . | 
RE は りき 95697ー お へ | ONーGOSUB | ON-GOSuB | ON-GOSuB | ON-GOSOB | 
gagE2ro9 カー へ 96 | | ON-ooS61 _ | 
| 守る 定 回 委 株 り 返 し 実行 | FOR-NEXT | FOR-NEXT | FOR-NEXT | FOR-NEXT 
|FOR NEXT 交 の 増分 を 指定 ” | STEP | STEP | SrEP | SrEP 
| 一生 の を 条件 つき で 閑 り 返し 夷 行 | iLE - WEND | HLE WEND | WTLE- WEND | WHILE -WEN | 
| ファ イル の 新規 作 成 | CREATE | CREATE | OPEN | OPEN | 
| ファ イル の 折 消 。 | peerE | petErE | KuL | KuL 
| ファ イル 名 の 変更 | RENAME | RENAME | RENAME | RENAME | 
ーー | oc トー トー 
| ファ イル の 保護 を 解除 = | | uNocK |』 | | 
| ファ イル バッ ファ の 割り 当て | OPEN | oPEN | oPEN | oPEN 
| ファ イル バッ ファ の 角 除 ” | ctosE | closE | cosE | ctosE | 
| プロ クラム 中 の 所 指 二 ” |REMAREMARK|REM REMARK] REM | REM | 
多聞 の 指定 ” |  pM |  DM |  pM | DM | 
の 最 池 の 指 二 ” | | |OPmoN ASEloPTN BASE 
析 馬 プロ グラ ム の た め の メ モリ 和 人 | SAVEMEM | SAVEMEM | CLEAR | OLEAR | 
坪 | ユー ザー 関数 の 定義 (| 行 ) | DEFFN | DEF | pFFN | peFFN | 
村 | ユー ザー 関数 の 定義 ( 反 行 ) | 5EFFN-FENO| DEF-FENO| | | 
テ | 交 SUB 手 六 の 字 姜 。 | | peF-FENp| | | 
| | 変 交 の 有 を 著 と し て 室 言 | MNTEGER | (NTEGER |] DEFNT | DEFNT | 
| 変 敵 の 型 を 半生 度 と し て 宣言 | | | DEFSNG | DEFSNG | 
ン 「 変 下 の 型 を 人 本 度 天外 と し て 宜 言 | REAL | REAL | DEFpBL | DEFOBL | 
多 の 弄 を 好 と し て 富 言 | STRNG | STRNG | DEFSTR | DEFSTR 
系 列 の 変更 ”)。。。 | RANDOMZE | RANDOMZE | RANDOMZE | RANDOMZE 
コン ソー ル ! 行 あ た り の 表示 邊 の 指 定 | POKE 272)| | wprH | wprH 
プリ ンタ ! 行 あたり の 上 の 控 | worm | |wnm rmNrlpntpnhr 
| エラ ー 時 処理 ルー テン の 指定 | | ONERORGOTO |ON ERROR GOTO|ONERRORGO 
1| ファ イル の 終了 を 検 則 。 | | FENos | goF | EoF | 
中 | プロ グラ ム 天 行状 態 導 跡 ” | TRACE | | RoN | RoN | 
| プロ グラ ム 天 行状 態 中 の 解除 | | | or | rmorF 」 
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CPM 上 で 走る BASIC 言 語 の 
ステ ー ト メン ト ・ 関 数 比較 一 覧 表 


既 | アス キー コー ド を 交 字 に 変換 "= | CHRS | CHRS | CHRS | CHRS 
| 指 十字 位置 か ら 任意 字数 の 取り 出し | MDS | Mps |  Mps | Mops | 
ス | 女 字 列 の 左 か ら 指定 数 の 文字 の 取り 出し | LEFTS | LEFTS | LEFTS | LEFTS 
リ | 与え られ た 女 字 の 練り 返し 文字 列 の 作成 | ” ””"”"”" "| ”  。 | STRINGS | STRNGS | 
ン | 指定 数 の スペ ー ス か ら な る 文字 列 の 作成 | "”"”" ” | | SPACE$% | SPACES 
トト UE トー] 
数 | 10 進 数 を 16 進 の 文字 列 に 変換 = 。 | | | HEXS | HEXS 
| | 0 進数 を 8 進 の 文字 列 に 変換 。。。 | "”" " | | ocT$ | oot$S | 
| の の 丸池 を アス キー コー ド に 科 抽 | ASC | ASC | AsC As 
信 り | 指定 廊 字 列 を 探索 し , その 位置 を 与え る | MATCH | MATCH | INSTR | INSTR | 
ク | 交 字 列 の 長き を 与え る | LEN | rtEN | rtEN | reN | 
胃 | 数 字 列 を 数 値 に 変換 。。。=。 。 | VAL | WVAL |  WL | WL 
| 指 定 ポ ホー ト か ら 1 バ イト 読 み 込む | INP | INP |  NP | INP | 
メモ リ の 指定 番地 の 内 容 を 与え る | PEEK | PEEK | PEEK | PEEK 
| コン ソー ル ・ ス テー タス を 与え る | CONSTAT% | CONSTAT% | | | 
コン ソー ル ・ デ パイ ス か ら | 文字 読み 込む | CONCHAR% | CONoHAR% | | | 
CP/M コマ ンド 行 の 婦 字 列 を 与え る COMANDS | COMANDS | | | 
変数 に 割り 付け られ た メモ リ 番 地 を 与え る | VARPTR | VARPTR | VARPTR | VARPTR | 
関 | 文字 列 に 割り 付け られ た メモ リ 番 地 を 与え る | SADD | SADD | 
入所 定 フ ァイル の プロ ッ ク 数 を 与え る 生ま に レーーー| 
他 | エラ ー・ コ ー ド を 与え る 。。 。 。 | | ERR | ERR | ERR | 
エラ ー の 発生 し た 行 番号 を 与 る る 。 | | ERL | ERL | ERL. | 


コン ソー ル か ら | 妨 字 読み 込み エコ ー パ バック し な い | | INKEY | INPUTS INPUTS$ 
コン ソー ル に 出力 され る , 次 の 沙 平 位置 を 与え る POS POS | POS POS 
POS 


圧 > 


| | ブリ ンタ に 印字 され る , 炊 の 平 位置 を 与え る | PoS | LPos | Lupos | 
人 
値 | 午 余 X-(XImJXm ” ” " | MODCxmW |  xMOD mt 演算 子 ) 

加 和 の 実数 化 。  。 |  。 FuoarcO | corco.CeNecO | 


実数 の 整数 化 


INT(x) CINT(x) 


| 下 義 erX SNe) に ーー so 
| | 全身 外 casX GOS9 | cs 
| 挨 ax | tae | raNe | 


逆 正 接 関数 arctanX 
| 平 カ 根 7X 。 | 


平方 根 /X 


CPM 上 で 走る BASIC 言 語 の 
ステ ー ト メン ト 関数 比較 一 覧 表 


2 . 定数 , 変数 仕様 一 覧 表 


5 列 mm mm | cgasiecmreo | vgasicgascow | 


ii +32767 
整定 数 
ー327e8 ] ー3769 


有効 数 ーー 
半 精 度 実 定 数 | 最大 指数 ーーーーーー 一 某 ーーー ーー 
1 電 人 0 引数 ou Wh WWvW〔Wwtwtwt〔t lt. = 電 = |l 


| 有効 格 数 =。 | I4 桁 。 | lie 桁 。 | 
一 革 一 一 一葉 一 一 
| 最小 指数 。 | に 
ーー トー 条 史 トー" 岳 S] 
進 法 表 示 。 | 8 進 定数 。 | |l 員 信 の 前 に 4 まり た は &O 
| 半数 。。。 『 数 備 の 後 CBUMobo Muvhvhv5 5 WW〈〔{〔』 
| | 女 字 定数 | 最大 文字 列 定数 表 ] 255 文 字 。 | 255 双 字 。 | 
整数 型 。。。 |  % |  % | 


内 pr 1 六 策 箇 痕 有 lohuv WW'〈'〈}〔j}tWl\ ハ ぴ ttwW〈WW | 
| 人 精度 実 数 肛 。 | 何 も つ け な い |  #* 。 | 
| 0 


数 文字 型 


和 
叶 共 聞 数 名 の 有効 | 


| 3 ベル の 使用 | ceeoo ぁ 可 | 和 条 | 
窒 | 」 行 の 最大 字数 | gs% 字 | gm 守 | 
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〇 P ノ M 上 で 走る BASIO 言 語 の 
ステ ー ト メン ト ・ 関 数 比較 一 覧 表 


3 . 演算 子 一 覧 表 


6 
上 
| 整数 除算 |  。 / |』 へ \ ま た は \W | 
ーー: 
ーー 誠人 サ 


| 等 C い tb) ハハ 、 =gkemeo 1 = 


トー Leew すす `、 5 球 Eee 1 
5 
人 | か WW や や = | % ま SWUW WI WIW1〔{ 
ーー ニー 
に レー NNoh0e トー の nM NM ーー ュー 

字 等 し く な い | く > ま た は NE | 2 
演 大 きい | > また は GT | 
| Wovovo>o>>o>owowtlt' NT _ WM 5 補 | 
ど 大 きい か 等 し い | 。 あ 守 まだ 人 ME Wi 
| ホ き が 等 し 愉 。 。 WM 。 寺 三 ま た ME_ ww WW vw il 
否定 トー 計上 ト 一 
論理 策 ーーー 人 5 トー な Ap | 
(内 名 的 ) 論 理 和 
他 人 論理 和 トー 


318 


が 妹 C 相 寺 で 古 記 し た 衝 導 ジフ ウ ェ ア に つい て 


本 書 で 使用 し た ソフ トウ ェ ア の 中 で , 


MACRO-80 (和文 マニ ュ ア ル 付 ) 
LINK-80 (和文 マニ ュ ア ル 付 ) 
BASCOM (和文 マニ ュ ア ル 付 ) 
FORTRAN-80 (和文 マニ ュ ア ル 付 ) 
muLISP 


以上 は , マイ クロ ソフ ト 社 の 極東 総代 理 店 で ある 帆 ア スキ ー コ ン シ ュ ー マ プ ログ クツ (TEL : 03-486 
-7111) か ら , その 最新 バー ジョ ン を 快く 提供 し て 頂き まし た . 


また 。 
MAC (和文 マニ ュ ア ル 付 ) PL/I-80 (和文 マニ ュ ア ル 付 ) 
RMAC ACT69 
ZSID XLT86 
CIS COBOL (和文 マニ ュ ア ル 付 ) SuperCalc (和文 マニ ュ ア ル 付 ) 
CB-80 UTILITY VOL1 (和文 マニ ュ ア ル 付 ) 
PASCAL プ MT+ 


以上 は , デ ジタル リサ ー チ ナチ 社 の 極東 総代 理 店 で ある . 帆 マイ クロ ソフ トウ ェ ア ・ ア ソ シ ェ イツ (TEL : 
03-497-0381) 
か ら , その 最新 バー ジョ ン を 快く 提供 し て 頂き まし た . 
また , Rgy FORTH に つい て は 。, 
則り リ ギ ー コ ー ボ ポレ ーション (TEL : 045-313-3038) 
か ら , その 最新 バー ジョ ン の 提供 と , プロ グラ ミン グ に つい て の 親切 な 助言 を 頂き まし た . 
これ ら の ソフ トウ ェ ア の 購入 や , 問い 合わ せ に つい て は , 上 記 , また は 上 記 の 販売 店 に 相談 し て 下 


さい . 参考 まで に , 和文 の マニ ュ ア ル が 付属 し て いる も の は , “(和文 マニ ュ ア ル 付 )/” と し て お きま し た . 
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本 書 で 使用 し た 首 種 ソフ トウ エア に つい て 


輸入 ソフ トウ ェ ア の 和文 マニ ュ ア ル 付 の も の は , 上 記 ま た は 上 記 の 販売 店 に よる ルー ト で な けれ ば 
入手 で きま せん の で , よく 確認 し て 下さ い . 


アス キー コン シュ ー マ プ ロダ グ ツ の 那須 勇次 氏 
マイ クロ ソフ トウ ェ ア ・ ア ソシエ イツ の 社長 の 岡田 純一 氏 
リ ギ ー コ ー ポ レー ショ ン の 社長 の 片桐 明 氏 
に は , 当 CPM シリ ー ズ の た め に 何かと 協力 頂き まし て , 本 当 に あり が どう ご ざい まし た 


用 旨 ee 


"上 


本 書 で 使用 し た ソフ トウ ェ ア な どの マニ ュ ア ル 
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好 録 り D Cyversjop2.2 ク の バグ 7 ごつい て 


デジ タル リサ ー ナ 社 は , 1982 年 1 月 に , それ 以前 に リリ ー ス し た CPM version 2.2 の バグ 情報 の 
まとめ を 発表 し て いま す ., 

一 般 的 な ユー ザー に は 直接 関係 な い パ バグ も あり ます の で , ここ で は , 日 常 使う 可能 性 が ある も の で 
一 応 は 訂正 し て お いた 方 が よい と 思わ れる も の を 2 件 ほど 紹介 し て お きま し ょ う . それ 以後 の リリ ー 
ス の も の は , 除 々 に 修正 きれ つつ ある と 思い ます が , 湊 に 示す リス ト の 箇所 を , 一 応 DDT で 確認 
て みる と 良い で し ょ う . 


PIP の パラ メー タ [S] と [0Q] の バグ 

PIP の オプ ショ ン で ある [S] と [Q] パラ メー タ を 使っ て , [S 文 字 列 1 へ ZQ 文 字 列 2 へ Z] の 複合 コマ 
ンド と し て , 文字 列 1 か ら 文字 列 2 の 間 を 転送 する 場合 , “文字 列 1” の 字数 と “文字 列 2” の 宇 数 が 同 
じ 長 さ の 場合 , 正常 な 動作 を し な い 場 合 が あり まし た . 

これ は , 次 に 示す 手順 で パッ チ を 行う こと に より 修正 で きま す . 


A>DDT _PIP。COM) DDT を 起動 し ,PIP. COM を ロー ド に する. 
DDT VERS 2.2 
NEXT PC 
1Eoo oloo 
ー し 1 168B。 1179/ 
116B LDA 
116B STA 1DF フ 7 
1123 NHVt MOo | 違 ア セン ブル し て ,/ グ 休 所 の 休 
ン R 
Wi か 0 ご の よう に な つて いる も の は , 以下 の よう に 修正 する . 
1176 INR ^a 
1177 STA 1DFB 
117A 
-A1168) 
116B LX1 H,1F627 
116B MOV a。MJ 
116C 
116F MVI M。O/ 


の ーー ライ ン ・ ア セン プラ で , この よう に 修正 する . 
1175 MVIPO) 

1177 INR a/) 

1178 DCX H/ 


1179 MOV M。 人 n/ 1 
117 人 』 


人 
ーBO 7 -…--DDT を 終わ り CP ン M に 戻る . 


32 1 


CPM version2.2 の バブ に つい て 


>SAVE 29 PTP。COM ) 修正 し た PIP.COM の メモ リ ・ イ メー ジ を ディ スク に セー ブ す る . 
人 a> PIP_ COM の バッ ツチ 完 了 . 


Figure-D.1 PIP の [S-Q] パラ メー タ の バグ の 修正 . 


SUBMIT ファ イル の 中 の コン トロ ー ル ・ キ ャ ラク タ の バグ 

SUBMIT ファ イル (. SUB) 中 に コン トロ ー ル ・ キ ャ ラク タ を 含め る 場合 は , 例え ば Ctrl-Z で 
あれ ば , 山形 印 の “人” と “ZZ の 2 文字 を 使っ て 、 “和信 ” と 書け ば , これ は SUBMIT に よっ て Ctrl 
-Z と し て 認識 され る こと に な っ て いま す が , 正常 に 動作 しない 場 合 が あり まし た . 

これ は , 次 に 示す 手順 で パッ チ を 行う こと に より 修正 で きま す . 


A>DDT SUBMIT.CON) DDT を 起動 し ,SUBMIT.COM を ロー ド . 


45 凶 ア セン ブル し て , パグ 個所 の 確認 . 
B。O19D | ご の よう に な つて いる も の は , 以下 の よう に 修正 する . 


O247 
O4SE 
OE7D 


アド レス 442H の 1 バイ ト の み 変 更 する . 
ーBO 】 .…、DpT を 終り CP ン M に 戻る . 


ABAVE 5_SUBMIT.COM ) 一 修正 し だ SUBMIT.COM の メモ リ ・ イ メー ジ を ディ スク フ に セー プ す る . 
SUBMIT.COM の バッチ 完了 . 


Figure-D.2 SUBMIT の コン トロ ー ル ・ キ ャ ラク タ の バグ 修正 。 
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リロ ケー タプ ブル ・ オ プ ジ ェ クト …… の ttit… 181,183 
リン クト … の ドド トト ドド トド で で くく くく ここ と 181,183 
リン クタ ロー ダー ドド ドド oo 193 
ログ イン デイ スク ーー ドド ドド ドド om 75 
ログ イン ・ ベ ベク トル OPC と CC た らい ここ C つ DCC 97 
ルレ ュ ギグ グー ュー に sss sciesaesearemieas 18,30 
豆 ジ カル ・ デ ババ イス POCCCPOCEKEEPPLEPPPYCIEYYYKEPLYYYY 14.61 
/ 
ワー クシ ー ト GCCCCCOCCLLPPPCCCOCCC た COCCOCLCLCKCEILLLLLKL て KK 287 
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アス キー・ ラ ー ニ ング シス テム CP/M シ リー ズ 


村瀬 康治 著 
アス キー 出版 局 


CP/M は Digital Research 社 の 登録 商標 で す . 


IO バイ ト ロジ カル ・ デ バイ スン フィ ジ カ ル ・ デ バイ ス _ 1 


| し き 定 や 語 居 時 


] | _RDR: | CON: | ロジ カル - デ アベ バ イス 
が あき 1 


bit ! bit IO バイ ト ( ア ドレ ス 03H) 
1 0 の bit ボ ポジ ショ ン 

EOn 90 ] 

EPCWS 


人 t ! bit 

4 H 

[oO 0] [O 0] [oO 90 

上 り 昌信 ES TWS 

PTP: PTR: (所: 審 憶 > 

MP は UR 1 : BAT: 
UP2: UR2: (!N と 表 蘭 


"コン ソー ル ・ デ バイ ス ( 入 出力 装置 )、 代表 的 な も の は キー ポー ド お よび スク リー ン . 


[バイ ナリ ・ デ ー タ ] 
フィ ジ カ ル ・ デ バイ ス 名 


CRT: 
し 攻 。 敵 に 
UL 1 : 


RDR Le リー ダ ・ デ バイ ス ( 入 力 装置 ). 

りな も の - に ニニン な 
お ageetn バン チ ・ デ バイ ス ( 出 力 装置 代表 的 な も の は RS-232C イ ンタ イス な ど . 
旧 人 SE rarret リス ト ・ デ バイ ス ( 出 力 装置 )、 代表 的 を も の は プリ ンタ . 


ロジ カル ・ デ バイ イス, フィジカル ・ デ バイ ス と も それぞれ の 名 前 が 具体 的 を デバ イス 名 を 表し て いる の で は な く , た だ 一 般 的 
な 公称 に すぎ な い . 


BIOS JUMP ベ フ トル ・ エ ント リ ・ ポ イン ト 


BOOT コー ルド ・ ブ ー ト ー C0 

WBOOT ウォ ー ム ・ プ ブー ト ー C 一 ドラ イブ No. 

CONST コン シン ソー ル ・ ズ ステ デー タス ・ チ ェ ッ ク ー AFFH/00( レデ ィ ー/ ビ ジー ) 
CONIN コン ソー ル 入 力 ーー A 一 入力 キャ ラク タ 
CONOUT コン ソー ル 出 力 ー 

LIST リス ト 出 力 トウ め ャ ャ ラッ 

PUNCH パン チ 出 力 

READER リー ダ 入 力 ニー A 一 入力 キャ 

HOME ヘッ ド の ホー ム ・ シ ー ク ー 

SELDSK ディ スク ・ ド ライ ブ の 選択 Cー ド ライ ブ No. HL<-DPH 

SETTRK トラ ッ ク No. の セッ ト C 一 トラ ッ ク No. 

SETSEC | セク タ No. の セッ ト Cー セ クタ No. 

SETDMA | DMA ア ドレ ス の セッ ト BC 一 DMA ア ドレ ス 

READ 指定 され た セク タ の リー ド ー A<-00/01(OK/ エ ラー) 
WRITE ん ライ トド ーー が 

LISTST リス ト ・ ス テー タス の チェ ッ ク ー AFFH/00( レデ ィ ー/ ビ ジー ) 
SECTRAN | セク タ ・ ト ラン スレ ー タ BC 一 ロジ カル ・ セ クタ No. HL 一 フィ ジ カ ル ・ セ クタ No. 


DE 一 トラ ンス レー ト ・ テ ー 
プ ブル ・ ア ドレ ス 


FCB( フ ァイル ・ コ ント ロー ル ・ プ ロッ フ ) SS 


| 20 | 7】 | 72 | 279 】 24 | 75 | 26 | 77 | 26 | 279 ! 2A | 79 1 
| 25 | 


|_do | di | q2 | | d9 | gio | gi | gi2 | d13 | d14 | di5 | 
し 32 | 33 | 34 | 35 | 
に 環 『 テ 
LEGSTKYKYYLES ドラ イプ ・ コー ド 。 00 ニ ログ イン グー ドラ イブ A : 。02 ニ ドラ イブ B:。…… 
f 人 一介 ………… ド ーー プラ イマ リ ・ ネ ー ム 
フ 
t1 一 13 PCCELCLCLLCLLLLLLLLL コテ > る 当 、 ジ ! ァイル 名 。 
ESECEECOEPPEETCPTEPD 当 FCB の ロジ カル ・ エ クス テン ト No. 
S1 PPCCEPPPPPPPEEPPPPPEED シス テム 内 部 で 使用 . 


"OPEN, MAKE, SEARCH の と き は 最初 に 00 に モッ ト す る . シス テム 内 部 で 使用 . 
当 ロ ジ カ ル ・ エ クス テン ト の 総 レ コー ド 数 . 

シス テム 内 部 で 使用 (ディ スク ・ ア ロケ ーション ・ マ ッ プ )、 

"シー ケシ シャ ル ・ リ ー ド / ラ イト 時 の レラ コード No.。 

ラン ダム ・ リ ー ド / ラ イト 時 の レ ュ ー ド No.。 

通常 は 00. 00 で な い 場 合 は ラン ダム ・ レ コー ド の オー バ ・ フ ロー を 示す . 


注 ) ドラ イブ 名 の 指定 x は , それ が ログ イン ・ デ ィ ス ク の 場合 , 省略 で きる . 


圏 ファ イル や 周辺 装置 の 設定 お よび 状況 報告 プロ グラ ム 
アク セス 済 デ ィ ス ク の 空 エ リア の 容量 と ,。 その ドラ イプ が R/W か R/O か を レポ ー ト する . 


ST ドラ イプ ブ x: の 空 エ リア の 容量 の み レ ポー ト す る (x: の 省略 不可 ). 
saT ux reco em ドラ イブ x: 上 の ファ イ ル 1 PD の 各種 サイ ズ と アト リ ビ ュ 
ー ト を ボー トト す 才 。 
DCUTS NM ー… 上 と 同じ 機能 + フ ァイル ・ サ イズ の レポ ー ト . 
filematch 
SATuxd yeten sa ドラ イブ xx 上 の ファ イル oma アト リピ ュー 
ト “atr” を 設定 する . 
STAT L」DEV ii 周辺 装置 の 現在 の 割り 付け 状況 レポ ー ト する . 
STATL」VAL ooo STAT コ マン ド の メニ ュー と 。 ロジ カル / フ ィ ジ カル ・ デ バイ ス の 一 覧 表 を 表示 する . 
STAT Llogdev: 三 phydev:… ロ ジ カ ル ・ デ バイ ス に フィ ジ カ ル ・ デ バイ ス を 割り 付け る . 
GTATDUSRMteyeoesersteessstsaesi 現在 の エー ザー・ エ リア と , ファ イル が 存在 する ユー ザー・ エ リア を レポ ー ト する 。 
STAT Lix:DSK eee ドラ イプ ブ x: の 諸 元 を レポ ー ト する . x: が 省略 され た 場合 は 、 オン ライ ン に な っ て いる すべ て の 
イグ に つい で 。 
STAT Lix: 三 R/O…oiitit… ドラ イブ x: を 書き 込み 禁止 に する (x: は 省略 で き な い ). 


田 周 辺 装置 間 の デー タ 転 送 プ ログ ラム 


OCCULTOOUPOOOCOYYTLOY PIP プ ログ ラム を 起動 する . 
filename . ext w filename .ext” 
PP 1 せら ドラ イフ 9: 上 に ドラ イプ 
まる 。 
PIP 上 」d:newname . ext=s:filename .ext ド ライ ブ s: 上 の ファ イル “filename.ext を ドラ イブ d: 上 に ファ イル 名 を 変え 
て コピ ビー する 。 
CON 
"de トド ee Eee 各 ロ ジ カ ル ・ デ バイ ス へ ヘドラ イブ s: 上 の ファ イル “filename .ext” を 出力 する . 
LST 
用 中 直 
PIP 半 三 s:filename . ext………… も し IO バイ ト に よる フィ ジ カ ル ・ デ バイ ス が サポ ー ト され て いる な ら 。 フィ ジ カ ル 
UR1 : ・ デ バイ ス へ の 出力 も 上 と 同様 に 可能 . 
PIP 」d:filename .ext 三 RDR: …… it… RDR : デバ イス か ら デ ー タ を 入力 し ドラ イブ d: 上 の ファ イル “filename .ext” と 
し て セー プ す る 。 


の 
も し IO バイ ト に よる フィ ジ カ ル ・ デ バイ ス が サポ ー ト され て いる な ら , 上 と 同様 に 
フィ ジ カ ル ・ デ バイ ス か ら の 入力 も 可能 . 


PIP L」d:fiename . ed 0 れ SYtesen 


PIP tdev: 王 rdeVi eee 入力 デバ イス か ら デ ー タ を 入力 し , 出力 デバ イス へ 出力 する . 

COCO 三 s:filename1 .ext s:filename2 .ext s":filename3 . ext………PIP コ マン ド は , “,” で 区 切る こと に より , 複数 の 
ファ イル を 順次 転送 する こと が で きる .。 ファ イル 
に 限ら ず , 入力 デバ イス や , 特別 デバ イス の 場合 


も 同様 . 
圏 エ ディ タ 
ED Lix:fiename . ext…………… ドラ イプ x: 上 の ファ イル “filename.ext” を エディ ッ ト , ある い は 新しく 作る . 
画 8080 ア セン プラ 
ASM し 」x:filename ーー… ドラ イブ x: 上 の ファ イル “filename.ASM” を アセ ンプ ブル し , 生成 され る “HEX”。`PRNP 
ファ イル を 同 ト ドラ イプ に セー プ す る . 
ASM し 」filename . ShD ファ イル "filename .ASM” を アセ ンプ ブル する . “s? は ソー ス ・ ド ライ ブ 名 .。“h" は HEX ファ 


イル を セー プ す る ドラ イブ 名 (Z は 生成 し な い ).*p”" は PRN フ ァイル を セー プ す る ドラ イブ 名 
(2Z は 生成 し な い . 双 は コン ソー ル へ 出力 ) を 指定 する . 


画 HEX フ ァイル ーCOM フ ァイル 変換 プロ グラ ム 
LOAD L」x:filename oo ドラ イブ x: 上 の ファ イル `filename.HEX” か ら 実 行 可能 ファ イル “filename .COM” を 生 
成す る . 


・ バ ッ フ ァ に テキ スト を n 行 ロー ド す る 。 
・ バ ッ フ ァ の 半分 まで テキ スト を ロー ド す る 。 


土 B'…… ド ie CP を テキ スト の 先頭 / 最 後に セッ ト す る . 
に OOOOOOCCHKKTD CP を 土 n 行 移動 し て , その 行 の 頭 に セッ ト す る . 
円 = 所 伯 に 2mvekReeszrssoszeess 同上 の 機能 その 行 の タイ プア ウト (テキ nLT). 
の ・ CP を その 行 の 頭 に モッ ト し て , その 行 を タイ プア ウト する (OLT). 
-- CCCCCCCCCPPPEPPPEETEEEPD CP を 次 の 行 の 頭 に モッ ト し て , その 行 を タイ プア ウト する (=LT). 
1 EGGGCCGOGCPTTTTE CP を ライ ン n の 頭 に モット する . 
王 nC…G の eeeetcecceo CP を 上 ュ n 文 字 移動 する . 
土 nT PCECELUCUCLLLLLLLLLL TI CP か ら 土 n 行 タイ プア ウト する . 
タ 0T eo…eeee ee 行 の 頭 か ら CP ま で タイ プア ウト する . 
イ nimT eee ライ ン nー ラ イン m の 間 を タイ プア ウト する . 
ヒ し 4 症 ド RRRRRRERR CP か ら n ペ ー ジ (1 ペー ジ は 23 行 ) を タイ プア ウト する . 
ウ 十 n 
ト 0 | POOLCLLLLLCLLLCLCCCLL 「CP の 移動 」 参 照 . 
】 
旨 nF 文 字 列 ……………-CP 以 後 , バッ ファ 内 で n 番 目 に 出合 っ た ` 文 字 列 ” の 最後 に CP を セッ ト す る . 
チト _ nN 廊 字 列 ……… の iii… CP 以 後 、 ディスク 上 の 未 ア ペン ド の テキ スト も 含め た 同上 の 機能 . 
| 隊 CCCOOOPCCPCLCLCO CP 以 後に イン サー ト 可 能 な モー ド に 入る . 
| 文字 列 ^Z… ・CP 以 後に ` 文 字 列 ? を 挿入 する . 
挿 | |」 六 字 列 ) … …CP 以 後に 文字 列 ? を 挿入 し . その あと に CR/LF を 挿入 する . 
入 nJ 文 字 列 1^Z 女 字 列 2^Z 廊 字 列 3 …… 「 置 き 替え ・ 変 更 」 参 照 . 
R PCOCCOCOLPLCYLKKYLLLLY と て X$$$$$$$ .LIB の 内 容 を CP 以 後に 挿入 する . 
Rfilename oo ライ プラ リ ・ フ ァイル “filename . LIB” を CP 以 後に 挿入 する . 
削 土 hD…① 選 いい CP か ら 土 n 文 字 を 削除 する . 
還 主 nKeeeeoeoeereeentn CP の 行 以後 ( 十 )/ 以 前 (一 ) の n 行 を 削除 する . 
nimK…ーー ド ドド ーー ドー ライ ン nー ラ イン mm の 間 を 削除 する . 
ns 文字 列 1^Z 廊 字 列 2… CP 以 後 ,` 文字 列 1′ を ` 文 字 列 2” に 置き 替え る こと を n 回 繰り 返す . 
由 還 nJ 文 字 列 1^Z 廊 字 列 2^Z 廊 字 列 3 …… CP 以 後 , 最初 の ` 文 字 列 1*7 の あと に ` 文 字 列 2′ を 挿入 し , その後 ` 文 
き 字 列 3* まで の 文字 を 削除 する . これ を n 回 繰り 返す 
え CP か ら n 行 を “X$$$$$$$ .LIB" ファ イル に セー プ ブ す る . 
PS 上 記 `X$$$$$$$ .LIB” ファ イル の 内 容 を CP 以 後に 挿入 する . 
更 *X$$$$$$$ .LIB′" ファ イル を 空 に する . 
keep U コ マン ド 実 行 以後 、 入力 され た 文字 は すべ て 大 文字 に 変換 され る 。 一 けり で U り の キャ ン セ ル . 
ェ ー nMcommand…- *command" を CP 以 後 バ ッ フ ァ の 最後 まで n 回 繰り 返す . 
ーー Mcommand……………… *command” を CP 以 後 バ ッ フ ァ の 最後 まで 可能 な 限り 繰り 返す ( 三 0M ま た は 1M). 


バッ ファ の 最初 か ら n 行 を テン ポラ リ ・ フ ァイル に セー プ す る 。. 
通常 の 方 法 で エディ タ を 終了 し , CP/M に 戻る . 

一旦 通常 に エディ タ を 終了 し た 後 。 再び ED が 起動 し た 状態 に 入る . 
今 行っ て いる すべ て を キャ ン セ モル し , ED が 起動 し た 状態 に 戻す . 
ED を 中 止 し て CP/M に 戻る オリジ ナル ・ フ ァイル の 変更 は な し . 


ーー ュー さい に ロロ S4 


ーV で ライ ン No. を 表示 し な い モ ー ド . V で 表示 する モー ド . 

エディ ッ ト ・ バ バッファ の 「 空 エリ ア / バ ッ フ ァ 全 体 」 の サイ ズ を 表示 する . 
nー1 の 時 , 約 十 秒 (4MHz ク ロッ ク 時 ) の ディ レー・ タ イム を と る . 
n:command …… CP を ライ ン n の 頭 に モッ ト し , “command” を 実行 する . 

:n command ……ー…ー…ー *command” を CP か ら ラ イン n ま で に つい て 実行 する . 
niimcommand ……… ライ ン nー ラ イン m の 間 “command”′ を 実行 する . 


に ドム 】 


注 ) cp は キャ ラク タ ・ ポ イン タ の こと . 
・ 土 の 十 は 省略 で きる . n ニ 1 の と き は 1 を 省略 で きる . 
・* 半 "記号 を n 王 65535( 最 大 数 ) と し て 使用 で きる . 
・ 各 コマ ンド は 複合 コマ ンド と し て 使用 で きる . 


画 8080 デ バッ ガ 

DDT ドミ ミミ ミミ ナミ ミオ ミミ ナミ ミミ ミミ ミオ ミミ ナミ ミ オミ ミミ ミコ DDT を 起動 する . 

DDT L」x:flename . ext…ー……… DDT を 起動 し 、 ドライブ x: 上 の ファ イル “filename.ext” を アド レス 100H か ら ロ ー ド する . 
HEX フ ァイル の 場合 は その ロー ド ・ ア ドレ ス に 従う 。 


圏 デ ィ ス ク ・ フ ァイル 16 進 ダン プ ・ プ ログ ラム 
DUMP L」x:filename . ext………… ドラ イプ ブ x: 上 の ファ イル “filename .ext” を 16 進 で ダケ ンプ する . 


較 バ ッ チ 処理 プロ グラ ム 
SUBMIT し 」subfile…eeeeemttttt 代用 パラ メー タ ($1.$2…) を 使っ て いな い サ プ ミ ッ ト ・ フ ァイル subfile .SUB* の 内 容 を 
連続 実行 する .( 注 ) 
SUBMIT し 」subfile 上 」p1 L」p2L」p3 … 代 用 パラ メー タ を 実 パ ラメ ー タ (pl1.p2……) に 置き 替え て 上 と 同様 に 実行 する .( 注 ) 
( 注 : サ プ ミ ッ ト ・ フ ァイル は いずれ も ドラ イブ A: 上 に な けれ ば な ら な い )、 


田 CP/M シ ステ ム , コピ ー/ 生 成 コ マン ド 
SYSGEN… の em の mememeectcereeteod CP/M シ ステ ム ・ デ ィ ス ク の シス テム 部 を 他 の ディ スク に コピ ー, ある い は メモ リ 上 に ロ 
ー ド し た り 。 メモ リ 上 の シス テム を ディ スク の シス テム ・ ト ラッ ク に セー プ し た りす る 。 


田 CP/M シ ステ ム ・ リ ロケ ー ト ・ ブ ログラム 

MOVCPM し 」 SS ロ 補 ee メモ リ ・ サ イズ ssK バ イト の CP/M シ ステ ム を 生成 し 。 メモ リ 上 に 配置 する .( 注 ) 

MOVCPM ee RAM の 最大 容量 を 自動 的 に 求め , 設定 可能 最大 サイ ズ の CP/M シ ステ ム を 生成 し 。 メモ リ . 
上 に 配置 する ( 注 :ss=20 一 64. NEC の CP/M な ど で は , 特別 な 機能 を 追加 し て いる ). 


例 : PIP_d: =s:fiename . ext [V]. [VU] な ど と 複合 コマ ンド も 可 . 


Block. CtrlLS に より バッ ファ リン グ に よる プ ブロック 受信 を 行う . 

Delete.1 行 の 文字 数 が n 字 を 越え た も の を 削除 し て 転送 する . 

Echo. 転送 中 の デー タ を 同時 に コン ソー ル に も 出力 する . 

Form feed. 転送 デー タ か ら フ ォ ー ム ・ フ ィ ー ド ・ キ ャ ラク タ (OCH ) を 削除 する . 

Get. 他 の ユー ザー・ エ リア か ら , PIP に よる 転送 を 可能 に する . 

・ Hex format. HEX フ ァイル の 転送 の 際 。 チェ ッ ク ・ サ ム な どの エラ ー・ チ ェ ッ ク を 行う . 
"Ignores null. [H] の 機能 ヌル ・ デ ー タ の 無視 . 

・Lower case. すべ て の 大 文字 を 小文字 に 変換 し て 転送 する . 

line Number. 転送 デー タ に ライ ン No. を 付け る (前 置き の "0* を 省略 し な い 場 合 は [N2] ). 
01 の ml Object files.、 EOF キ ャ ラク タ (1AH) に よる ター ミネ ー ト を 無視 する . 

[Pn] … ぐ eo Page ejects、n ラ イン ご と に ペー ジ 送 り を する . n テ 1 また は 省略 し た と き は 60 ラ イン . 

[Q 女 字 列 ^Z] …Quit. 転送 デー タ 中 に “文字 列 ” が 来る と , 転送 を 終了 する .^ 文 字 列 ” は 転送 きれ る . 

[S 女 字 列 ^Z] …Start. デー タ を サー チ し て , ゞ 文字 列 ” が 来る と “文字 列 ? も 含め て 以後 の デー タ を 転送 する . 


eeeerseetn・ Read. SYS” アト リ ビ ュ ー ト の 付い て いる ファ イル の 転送 を 可能 に する .[W] パ ラメ ー タ の セッ ト も 行わ 
れる . 

[Tn eeoii… Tab. タプ ・ ス ペー ス を n 文 字 に セッ ト す る . 

Ui Upper case. すべ て の 小文字 を 大 文字 に 変換 し て 転送 する . 

ck Verify.、 ディ スク 間 の ファ イル ・ コ ピー の 際 ,、 リー ド ・ ア フタ ・ ラ イト の エラ ー・ チ ェ ッ ク を 行う . 

W] rimo 富 … Write in R/O. R/O ア トリ ビュ ー ト の 付い た ファ イル に , 重ね 書き を 許す . 

[Z] ーー…… Zeros parity. 受信 デー タ の パリ ティ ・ ビ ピット を 0 に する . 


1 ゴ 9) 吉信 MLCOOTJOY End Of File(1AH ) の コー ド を 送り 出し 、PIP に ター ミネ ー ト 処理 を させ る . 

1 40 個 の ヌル ・ コ ー ド (OOH ) を 送り 出す 。 

笠間 LST: デバ イス に , ライ ン No. が 付き , 8 文字 スペ ー ス の タプ が 働き , 60 行 ご と の ペー ジ 送 り の 機能 が 加わ 
っ た も の 、. 


1 NeDWe *PIP .COM* の 中 に 、 ユ ー ザ ー が 独自 の ルー チン と し て 組み 込み が 可能 な 入力 / 出 力 * 義 置 "。 


ASSSShiiii 1 ステ ッ プ ご と の ライ ン ・ ア セン ブル を し , アド レス ssssH か ら ロ ー ド し て 行く . 


Dssss,eeee errnr アド レス ssssH か ら eeeeH の 間 を 16 進 と アス キー・ キ ャ ラク タ で ダン プ す る . 

D,eeee eeeeseseeseeseeeeeeseesee 現在 の ディ スプ レー・ ア ドレ ス か ら eeeeH ま で を ダン プ す る 。. 

Dsssseoooennnnnrrnnr アド レス ssssH か ら 12 行 分 を ダン プ す る . (1 行 は 16 バ イト ) 

Di 現在 の ディ スプ レイ ・ ア ドレ ス か ら 12 行 分 を ダン プ す る . 

Fssss,eeee,Cc……t…… アド レス ssssH か ら eeeeH の 間 の メモ リ 全 体 に 。 デー タ ccH を フィ ル ( 書 き 込む ) す る . 
rbbbb 

7 Yo | emR 1 つま た は 2 つの プレ ー ク ・ ポ イン ト (bbbbH と b'b'bb'H ) を 設け て , アド レス ssssH か ら リ アル 
4 ・ タ イム で 実行 する . 

Na ! …… 現在 の プロ グラ ム ・ カ ウン タ か ら 上 と 同様 に 実行 する 

G,bbbb ,bb'bb" 上 ョ 

人 Ps に ココ ミロ ゴー ここ プレ ー ク ・ ポ イン ト を 設け ず 。 アド レス ssssH か ら リ アル ・ タ イム て で 実行 する . 

COCOCECECEECPPPCCEEEEECEEEEEEEE 現在 の プロ グラ ム カウ ンタ か ら 上 と 同様 に 実 

Hxxxx,yYYYO で Trm 16 進 数 xxxxH と yyyyH の 和 と 差 の 計算 を し て 表示 する . 

lfilename . ext……… の の FCB(5CH) に ファ イル 名 ^filename.ext? を セ モット する . ド ライ ブ 名 を 付け て は いけ な い . 

SPYOBCVsz お ろ a5 で ZS FCB に セッ ト さ れ て いる ファ イル を アド レス 100H か ら ロ ー ド する . HEX フ ァイル の 場合 は , 

その ロー ド ・ ア ドレ ス か ら ロ ー ド する . 

Rbbbb……eemeeetttttrt ロー ド ・ ア ドレ ス が +bbbb 廿 分 加算 (オフ セット ) され る 以外 , 上 と 同様 . 

Lssss , eeee で TITT アド レス ssssH か ら eeeeH ま で を 逆 ア セン プル する . 

剛 電 人 た や 45 が 32Xoc23< さ ae と r23 アド レス ssssH か ら 11 ス テッ プ 分 を 逆 ア モン ブル する . 

| 軸 和 OO と OO 現在 の リス ト ・ ア ドレ ス か ら 11 ス テッ プ 分 を 逆 ア セン ブル する . 

Mssss,eeee,nnnne…" アド レス ssssH か ら eeeeH ま で の デー タ を , アド レス nnnnH か ら へ プ ブロック 転送 する . 

Sssss に に ここ ここ も ドレ ス ssssH か ら の メモ リ 内 容 を 表示 し , 仕 意 の デー タ に 変更 する . 終了 は ピリ オ の 

し 。 リ タン する 。 
PCOCCCO こ OO 現在 の プロ グラ ム ・ カ ウン タ か ら ,。n ス テッ プ 分 を トレ ー ス 表示 し て 実行 きせ る . 


・ 最 初 の ステ ッ プ の み 表 示さ れる Tn コマ ンド . 

… 現 在 の CPU の 各 レ ジス タ 。 カウ ンタ 。 フラ グ 。 命令 な ど を 表示 する . 

し (OOLCHHHOTOCKCOKCKOOO r で 指定 する , C( キ ャ リー), 2Z( ゼ ロ ), M( マ イナ ス ),E( 偶 数 パリ ティ ), I(aux キ ャ リー)、 

A, BC, DE, HL( 各 レジ スタ )。S( ス タッ ク ・ ポ イン タ )。P( プ ログ ラム ・ カ ウン タ ) な ど を 。, 
任意 の 値 に 設定 する . 


(b=CP/M サ イズ ー20K) 


00H 一 02H BIOS の ウォ ー ム ・ ス ター ト の エン トリ ・ ポ イン ト へ の JUMP ベク トル 


05H 一 07H BDOS コ ー ル の JUMP ベク トル 
08H 一 37H 未 使用 


38H 一 3AH DDT で 使用 する RST 7 の JUMP ベク トル 
未 使用 


デフ ォ ー ル ト の FCB 
デフ ォ ー ル ト の DMA バ ッ フ ァ 


3BH 一 5BH 
5CH 一 7FH 


80H 一 FFH 


100H 一 33FFH 十 b 


3400H 二 b 一 3BFFH 十 b 


3CO00H 二 b 一 49FFH 十 b 
4A00H 二 上 b 一 4FFFH 十 b 


filename . ext………… 英 大 小文字 お よび 数 字 と 一 部 の 記号 . 


ーーーーーー ペー 

カイ ?0" た ム 。 . エア ショ ン 

(8 文字 まで ) (3 文字 まで ) 

使用 で き な い 女 字 …… く 2 。 ぁ 5 [上 | お よび スペ ーー らら か みか ナ 。 


代表 的 な ファ イル 名 の エク ステ ンション (標準 CP/M 関 係 の み ) 


。 ASM ……… CP/M 標 準 ア セン プラ の ソー ス ・ フ ァイル . 

。 HEX… …・ イ ン テ ル HEX 形 式 の オプ ジェ クト ・ フ ァイル . 

。 COM ……… CP/M で て 即 実 行 可 能 な 純 マ シン ・ コ ー ド の トラ ンジ ェ ン ト ・ コ マン ド ・ フ ァイル . 
< PRN……・ ASM に より 生成 され る リス ト ・ フ ァイル . 

。BAK……… ED に より リザ ー プ され る バッ クア ッ プ ・ フ ァイル . 

<・LIB……… ED や MAC な ど で 利 用 する ライ プラ リ ・ フ ァイル . 

。 SUB……… サ プ ミ ッ ト ・ フ ァイル . 

。$$$………… PIP や ED 内 部 で 使用 きれ る テン ポラ リ ・ フ ァイル . 


ー ン か ら 消 える も の と ,、 エコ ー・ バ ッ ク さ れる も の と が ある ). 
同上 . た だ し 削除 され た 文字 は スク リー ン か ら も 消え る . 


織 織 た は Back space ……" 最後 に 入力 し た 文字 を 1 文字 ずつ 削除 する (削除 され た 文字 は マシ ン に より スク リ 


Ctrl - 


あ 「 cr - - 入 力 し た 行 の 全部 を キャ ン セ ル す る . 
虹 - 入 力 し た 行 の 全部 を キャ ン モ ル し . スク リー ン 上 か ら も 消去 する . 
し コン ソー ル 表 示 を ポー ズ ( フ リー ズ ) す る . 次 の 何ら か の キー 入力 て 解除 きれ る . 
1 入力 し た ライ ン を 次 の ライ ン に 再 表 示す る . 
マル 表示 上 だ け の 復帰 ・ 改 行 を 行う . 
と 人 キャ リッ ジ ・ リ タン と 同じ . 
マネ ・ ラ イン ・ フ ィ ー ド と 同じ . 
1 8 文字 ご と の タプ 


コン ソー ル 出 力 を 同時 に LST: デ バイ ス へ も 出力 する . 次 の Ctrl-P の 入力 て 解除 され る . 
リプ ー ト (ウォ ー ム ・ プ ー ト ) を 起こす. 
ED 内 で , IF.S コ マン ド な どの ター ミネ ー タ と し て 使用 する . ま た PIP の ター ミネ ー タ と し て も 使用 する . 


ビル トイ ン ・ コ マン ド 


注 ) ドラ イブ 名 の 指定 < は , それ が ログ イン ・ デ ィ ス ク の 場合 , 省略 で きる . 


圏 フ ァイル 名 リス ト ア ウト ・ コ マン ド 


DR ドラ イプ x: 上 の すべ て の ファ イル 名 を リス ト ア ウト する 。. 
DIR L」x: 大 ename . ext……… ドラ イプ ブ x: 上 の *filename.ext "を 捜し , 存在 すれ ば その ファ イル 名 を リス ト ア ウト する 。. 
DIR し 」x: 信 ematch oi oi ドラ イブ x: 上 か ら フ ァイル ・ マ ッ チ ( ?※* ) し た すべ て の ファ イル 名 を リス ト ア ウト する 。 


圏 ア スキ ー・ フ ァイル 内 容 タ イプ アウ ト ・ コ マン ド 

TYPE し 」x: 人 ename . ext…… ドラ イプ x: 上 の アス キー・ フ ァイル "filename.ext" を タイ プア ウト する . 

圏 フ ァイル 名 変更 コマ ンド 

REN L」 x : 新 filename . ext 三 旧 fename .ext… ド ライ ブ x: 上 の “Ifilename.ext” を “ 新 filename.ext” に, ファ イル 名 を 


変更 する . 
較 フ ァイル 削除 コマ ンド 
ERA し 」x:filename . ext……… ドラ イプ x: 上 の ファ イル "filename .ext を 削除 する . 
ERA し 」x:filematch ………ー…… ドラ イプ ブ x: 上 の ファ イル ・ マ ッ チ (? 率 ) す る すべ て の ファ イル を 削除 する . 


較 メ モリ 内 容 デ ィ ス ク ・ セ ー ブ ・ コ マン ド 

SAVE 上 jn Lix:filename .ext … ア ドレ ス 100 是 か ら nX256 バ イト の デー タタ を. ドライブ x: 上 に filename.ext と し て セー ブ す る . 
較 ユ ー ザ ー・ エ リア 移行 コマ ンド 

USER En ooneernrnnn ユー ザー・ エ リア n に 移行 する (n= テ 0 一 15). 

圏 ログ イン ・ デ ィ ス ク の チェ ンジ 

RSSTybeygy3P 523423 い oct ドラ イブ x: に ログ イン する 。 


FC 王 . ファ イル レ - コ ント ロー ルレ ・ ディ スク ・ ド ライ ファ イル 名 最上 位 ビ ピット を 当 FcB の ロジ カル - エ クス テン ト 番 
フロ ンク 2 持寺 に 2 の エク ステ ント の 
デフ ォ ー ル ト の アド レス に の そそ 。 や 9 一 だ) (エクス メッ ショ ミン ーーーーーーー 宮 ビ コー ぜ 雪 
は ーー ある 信 あ 8| 年 | 王 | ラ | ノ 
通し 番 
きき ラー を |r| 且 2|8|4|16| 6| 人 | 中 81&li12| < 
機能 名 bit7= ニ 1 の 時 *R/0". フ ァイル 0 一 128 の 値 
bit7= ニ 1 の 時 “SYS" ファ イル MAKE. 
に 00 を セッ ト す る . 


0 一 31 の 値 . 最初 に ユー ザー が 00 
ディ スク ・ ア ロケ ーション ・ マ ッ プ . シス テム が 内 部 で 使用 を セッ ト す る . 


227 ンプ テン プス ン フ レブン ィ ン ン ンタ ネリ ン テ ン レン] 


ン 生 プッ ン キン ターン ャ ン ァ ン ェ ン 
* ポ | [61 12 138134135146 | 32 | 38 139 aiolailaizlgislilais| 


初 に ユー ザー が oo に セッ ント する . 


シー ケン シャ ル ・ リ ー ド / ラ イ 
ト を 行っ て いる 場合 の その 時 00 で な い 場 合 は , ラ ンダ ム , レ コ 


点 で の レコ ー ド 半 号 ンー ヾ へ 、、 一 ド F の オー バフ ロー を 示す . 
0 一 65535 の ラン ダム ・ レ コー ド 番 号 


タ 結 果  A ま た は HL レジ スタ の 内 容 


ッ ト 
シス テム が リセ ッ ト さ れる 
|「w | 開 3 Aー 入 力 キャ ラク タ 
ONSORG コ シソ ツー ル 7 の Eー キ ャ ラク タ CON : へ 出力 され る 
| 0 | PR リーダ) か ら の 入 b A 二 入力 キャ ラク タ 


ON : (コン ソ ゾール) から 


ファ ンク ショ ン No. こ 
|C レ ジス タ に セッ ト す る ファ ンク ショ ン 
10 進 HEX ラメ 
ッ カ 
カ 


と 3 
シス テム ・ リ セッ ト な 
な 


| で アプ の 本 | キャラクタ RON: へ 四 の き れる 
8T (リスト ) へ の 出 | Eー キ ャ ラク タ LST : へ 出力 され る 
に ッッ | 入力 iA 入力 キャラ クタ 渦 コ ン ッ ー ル ムカ 
| 7 ox ト omgm スル 
| os | IO バイ ト の セッ ト E<-|0 バ イト IO バイ ト が セッ ト さ れる 
| 09 | 六 字 列 の プリ ント アウ ト | DE 一 婦 字 列 アド レス $ 記 号 ま で の 文字 列 が コン ソー ル に 出力 
| 0A | 2 放 ス タバ シフ ァ ズ の | PE 一 バッ ファ ・ ア ドレ ス | コン ソー ル か ら バ ッ フ ァ へ 入力 
9 の 222| な 入り AFP 入 め な し iA-Go 
ee27 后 | な し |mcedgu バー ジョ zte 
aaa 衝 "。 すべ て の ディ スク が リセ ッ ト さ れる 
| 14 | OE | タイ スク ・ ド ライ ブ の セ | Eー ド ライ ィ ブ No. デフ ォ ー ル ト ・ ド ライ ブ に 指定 され る 
ロコ EZZ7Z ア と Sr: が 2225 
ig] 0 | ファ イル の クロ ー ズ |ogcfcezF レ ォ | 
7 | の ファ イル の 9 サーチ |5E-FGB ァ F レ ス | 
正常 : A デ ィ レ クト リ ・ コ ー ド ファ イル が な い : AFFH 
区 の ファ イル の サー チ 
ファ イル の デリ ー ト | DEー-FCB ア ドレ ス 
シー ケン シャ ル ・ リ ー ド | DEーFCB ア ドレ ス 
正常 : Ac-00 。 装 了 ま た は ディ スク ・ フ ル : A て 00 以 外 
シー ケン シャ ル ・ ラ イト | DEーFCB ア ドレ ス 
ファ イル の 作成 | DE-FCB ア ドレ ス 。。 | 正常:Aー デ ィ レ クト リ ・ コ ー ド 。 ディ レク トリ ・ フ ル :A て FFH 
ファ イル 名 の 変更 | DE-FcB ア ドレ ス | 正常 : Aー デ ィ レ クト リ ・ コ ー ド 。 ファ イル が な い :A_FFH 
間 
kg 
DMA ア ドレ ス の セッ ト | DE-DMA ア ドレ ス DMA ア ドレ ス が セッ ト さ れる 
| を し |e ア ロタ ーション . ス クト ル ドレ ス 
02 件 プロテクト の ゃ |  。 な し | ログ イジ ^ ア ィ ス ク ガ が R/0 に セッ ウト まれ る 
な 
し 
oe 


カ シ ・ べ 
R0 ベ ラトル の り 
ャ る 2 アトリ ピュ ー 


人 
IIG" 


さき 圧 >Sr 吉 革 削 


回 日 EE 回 EEE 回 回 


ご 


ジ 
ョ 
ン 


回 
19| 
20| 
回 
|2| 
回 
124| 
125」 
|2」 
回 
回 
回 
回 
回 
回 
34 
回 
回 
| | 
回 
40 


に に お E 下 た 下 
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ビデ ァ | で し |cORDo=R アデ PC  。 
の ユー ザー・ エ リア が 変更 され る 。 Aー- ユ ー ザ ー・ コ ー ド 
な リード 
ル ・ サ イズ の 計算 FCB の r0 一 r2 一 ファ イル ・ サ イズ 
ム ・ レ コー ド の セ FCB の r0 一 r2 一 ラン ダム ・ レ コー ド No. 
クラ イプ の リ ベク トル の ドラ イブ が リセ ッ ト さ れる 


使用 され て いな い 


ライ ル を 件 う タン | DE-FGB ア ドレ ス 正常 :A-00 - エラ ー:Aー エ ラー・ コ ー ド 
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注 ) H し レジ スタ と 同じ 内 容 が AB レジ スタ に も セッ ト さ れる . 
注 ) ファ ンク ショ ン 12 は 、 version1.4 で は 「 ヘ ッ ド の リフ ト ア ッ プ 」 の ファ ンク ショ ン で ある . 
注 ) ディ レク トリ ・ コ ー ド : 128 バ イト 中 の 該当 ディ レク トリ の 位置 に より 、 0 一 3 の 値 を と る . 


